in reply to Re: pattern match on entire file
in thread pattern match on entire file

You can shorten this: 
@file = <FILE>;
$temp = join('',@file);

[download]
to just one line: 
$file = join '', <FILE>;

[download]


-tengo mas que aprender

In Section Seekers of Perl Wisdom