topic equivalent in perl in Operating System - Linux

equivalent in perl

Balaji N — Fri, 18 Jul 2003 16:34:18 GMT

gurus,

what is the equivalent of this in perl

sed '1s/blablabla/bla/' file.txt

basically i want to the reg exp substitution to happen on specific lines and not on all.

tia
-balaji

Re: equivalent in perl

Steven E. Protter — Fri, 18 Jul 2003 17:02:27 GMT

This is how I did it:

$commandline - "sed /s/tzfat/hebron/g $filename";

system("$commandline");

I know, cheating, cheating ...

This stuff is discussedin O'reilly's Perl Cookbook Chapter 6 Pattern matching.

SEP

Re: equivalent in perl

Balaji N — Fri, 18 Jul 2003 18:24:18 GMT

perl -pi -e '1 .. s/blablabla/bla' file.txt

thanks SEP for pointing the right resource.

-balaji