equivalent in perl

[Balaji N]

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

[Steven E. Protter]

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

[Balaji N]

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

thanks SEP for pointing the right resource.

-balaji