Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re^6: Finding a Letter at Last line

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


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

you can do this too... but you dont need use the ls insight of for...
for file in *.txt do perl -e 'open FILE, "<'$file'"; $_ = join "", <FILE>; print "true" +if /^t[^\n]*\Z/msi' done

Replies are listed 'Best First'.
Re^7: Finding a Letter at Last line
by mantra2006 (Hermit) on Nov 08, 2006 at 17:51 UTC
    Hi smokemachine
    excellent...thanks many..you saved my day...thanks again for the quick help
    Thanks & Regards
    Sridhar