We don't bite newbies here... much | |
PerlMonks |
Re: unwanted ARGV in subroutineby choroba (Cardinal) |
on Oct 29, 2012 at 21:48 UTC ( [id://1001428]=note: print w/replies, xml ) | Need Help?? |
my $text = do { local( @ARGV, $/ ) = $infile ; <> } ;This should locally change @ARGV to contain $infile and load the whole file into $text. Maybe the file is huge and you have just to wait a bit?
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ
In Section
Seekers of Perl Wisdom
|
|