On Mon, 8 Apr 2002 12:21:04 -0500, Chris Nandor wrote:

>Or, perhaps a bit faster, as you let Perl give you one string per file 
>instead of joining many strings per file:

>my $fil;
>{ local $/;
>  $fil = join '', <>;
>}

I'll use that one, as it gives an opportunity to insert an extra \n between  files.

Thanks

Reply via email to