develooper Front page | perl.beginners | Postings from December 2002

Re: Help with -e switch

Thread Previous | Thread Next
From:
Paul Johnson
Date:
December 24, 2002 07:17
Subject:
Re: Help with -e switch
Message ID:
20021224151700.GA31323@pjcj.net
On Tue, Dec 24, 2002 at 08:38:35AM +1100, Kieren Diment wrote:

> I'd like to know if it's possible to combine the -i and -e switches.
> I have the following script, and I'd like not to have to go to the
> bother of firing up an editor, chmod +x ing it and co:
> 
> #!/usr/bin/perl -w
> open FILE, $ARGV[0];
> while (<FILE>)
>        {
> 	 print if (/(^org_name)|(^email)|(^$)/);
>        }

perl -n00i.bak -e 'print if /^(?:org_name|email)/' file

> This script is for validating some paragraph delimeted data files for
> what it's worth...

-- 
Paul Johnson - paul@pjcj.net
http://www.pjcj.net

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About