Help for this page

Select Code to Download

Select or download this

$ usr/perlbrew/perls/5.10t/bin/perl -Mv5.10 -e'
   open FOO, "<", ".bashrc" or die $!;
...
   say "Dir: ", scalar( readdir( FOO ) );
'
Cannot open FOO as a dirhandle: it is already open as a filehandle at 
+-e line 3.