in reply to Data Move
Your code never calls your subroutine, so I assume something is missing here. But in general, if you only want to print the lines that are matched by your find-and-replace regex:
if( s/^$rcid\:.*/$rcid\:$car\:$owner/g ){ print $outfile $_; }
Aaron B.
Available for small or large Perl jobs and *nix system administration; see my home node.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Data Move
by PilotinControl (Pilgrim) on May 27, 2015 at 15:01 UTC | |
|
Re^2: Data Move
by PilotinControl (Pilgrim) on May 27, 2015 at 16:42 UTC |