in reply to Re: Traping [** using reg exp
in thread Traping [** using reg exp
Obviously there were extra chars at the end of the line that I couldn't see.use strict; open (LST, "c:\\tester.txt")||die "$^E : $!\n"; chomp (my @data=<LST>); for (@data) { print "$1\n" if ($_ =~ /(.+)\[\*+REQUIRES USER CONTEXT\*+\]\s*$/); } close (LST)
|
|---|