Help for this page
... for my $file (@files) { ... close $fh; } ...
... my @handles = map { open my $fh, '<', $_; $fh } @files; ... close $_ for grep { $_->opened() } @handles; ...
www.com | www.net | www.org
There is too much technical debt in my codebase The stability of the system Perl suits me better I have to support users of some ancient version I'm stuck with ActiveState/TinyPerl/microperl/Strawberry ... Letting the early adopters trip over the bugs is fine Some other reason
Results (30 votes). Check out past polls.
