#ex_07-2b #Learning Perl Appendix A, Exercise 7.2b while () { if (/a.*e.*i.*o.*u/i) { print; } } This HTML Help has been published using the chm2web software.