Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
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

[download]

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
[reply]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://582928]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others rifling through the Monastery: (4)
As of 2024-04-18 23:22 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found