At 9:37 PM +0000 6/19/07, [EMAIL PROTECTED] wrote:
before...
    /sws/scott/temp: pg file1
     line1 line1 line1 line1 line1
     line2 line2 line2 line2 line2
     line3 line3 line3 line3 line3
     /sws/scott/temp: pg file2
     line1 line1 line1 line1 line1
     line2 line2 line2 line2 line2
     line3 line3 line3 line3 line3

after...
     /sws/scott/temp: pg newfile
     file1*line1 line1 line1 line1 line1
     file2*line1 line1 line1 line1 line1
     file1*line2 line2 line2 line2 line2
     file2*line2 line2 line2 line2 line2
     file1*line3 line3 line3 line3 line3
     file2*line3 line3 line3 line3 line3


perl -lne 'print "$ARGV*$_"' file1 file2 | sort -t* -k2,99 > newfile


Gotta love Perl.

Stewart
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to