sorry to yell, didn't think about changing that before poting last time.
maybe I'm just using it wrong, but $. doesn't seem to behave as I'd expect.
i did:
15 foreach my $line ( @newfile ) {
16 if ( $line =~ m!dienice\("\d+\b! ) {
17 $line =~ s!dienice\("\d+\b!dienice\("$. !i;
18 $test = 1;
19 } elsif ( $line =~ m!dienice\("\D+\b! ) {
20 $line =~ s!dienice\("(\D+)\b!dienice\("$. $1 !i;
21 $test = 1;
22 }
then printed to the old filename. it all works except all the numbers are 0. as in the replaced lines look like :
"...or dienice("0 Can't connect to Oracle database..."
where 0 is where one would expect the line number. there were no line numbers or incorrect ones before, so this is progress. i tried my old syntax with the $line_num++, and that works, but I'd much rather use your suggestion as it's cleaner. any ideas?
In reply to RE: Re (tilly) 1: 'no such file' when it's there.
by jptxs
in thread 'no such file' when it's there.
by jptxs
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |