Re: [SLUG] Script needed

[Rodos]

On Thu, 1 Jun 2000, Adam Kennedy wrote:

> perl -e 'print grep { s/^(\w+)\:.*$/$1/; 1; } <>' < inputfile > outputfile

or

perl -F: -ane 'print "$F[0]\n";' < inputfile > outputfile

Lets hope this does not turn into an obfcated (sp?) contest. Awk is better
at this problem. As Larry says, awk has to be better at something.

Rodos

--
[EMAIL PROTECTED]  |If the box says "Windows 95 or better", it should run
                   |on Linux, right? [anon]

--
SLUG - Sydney Linux Users Group Mailing List - http://www.slug.org.au
To unsubscribe send email to [EMAIL PROTECTED] with
unsubscribe in the text