Peter Chubb wrote: >>>>>> "Phil" == Phil Scarratt <[email protected]> writes: > Phil> Something like this would work: > > Phil> cat <file> | perl -nle > Phil> 'if(/^\*\*\*\s+End\s+of\s+([\S]+)\s+at\s+.*/){print $1;}' > > > Why use cat? > > Why not <file perl ... > > The extra process plus pipe just wastes resources. >
Good point! But then again sed is probably a better option anyway Fil -- SLUG - Sydney Linux User's Group Mailing List - http://slug.org.au/ Subscription info and FAQs: http://slug.org.au/faq/mailinglists.html
