scriptname $MYFILE > OTHERFILE
#! perl -slw use strict; my $line; while( <> ) { chomp; m[^/\*] and next; m[^job_name:\s*(.+?)$] and $line = $1 .':'; m[^days_of_week:\s*(.+?)$] and $line .= $1 . ':'; m[^start_times:\s*(.+?)$] and print $line . $1; }
In reply to Re: [KSH convert to PERL] Rollup multi line values to single row outputs.
by BrowserUk
in thread [KSH convert to PERL] Rollup multi line values to single row outputs.
by captainK
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |