C'mon... be fair to Roger...he did print them back out...

Or Perl:
#!/usr/bin/perl


open F,"test.pl";@l=<F>;close F;print @l;



_________________________
~ John