Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re^5: Finding a Letter at Last line

by smokemachine (Hermit)
on Nov 08, 2006 at 16:58 UTC ( [id://582923] : note . print w/replies, xml ) Need Help??


in reply to Re^4: Finding a Letter at Last line
in thread Finding a Letter at Last line

because you are usin the for of shellscript to have the name of the file in $file and trying to use this in a perl program... you could do this?
perl -e 'for $file(@ARGV){open FILE, "<$file"; $_ = join "", <FILE>; p +rint "true" if /^t[^\n]*\Z/msi;close FILE}' *.txt