We don't bite newbies here... much | |
PerlMonks |
Re: Getting error when trying to compare two filesby Happy-the-monk (Canon) |
on Nov 13, 2015 at 07:57 UTC ( [id://1147639]=note: print w/replies, xml ) | Need Help?? |
DATA is still selected for your print commands, but no longer open. To fix it, insert my $old_fh = select(STDOUT); before your line
Then right before or right after your line saying
insert select($old_fh); That should make the error go away. (edit:) Alternatively do not use select but print explicitly to the filehandle instead: replace this bit of your code
with this bit print DATA join("\n", @output); Cheers, Sören Créateur des bugs mobiles - let loose once, run everywhere.
In Section
Seekers of Perl Wisdom
|
|