It will always give you a glob memory address
#!/usr/bin/perl --
use Data::Dumper;
use strict;
use warnings;
opendir my $dh, "doesnotexist.mustnotexist";
print Dumper( $dh);
__END__
$VAR1 = \*{'::$dh'};
D:\dev\misc>
D:\dev\misc>perl
#!/usr/bin/perl --
use Data::Dumper;
use strict;
use warnings;
for my $dir( "doesnotexist.mustnotexist", "."){
opendir my $dh, $dir;
Parentheses missing around "my" list at - line 7.
print "dir $dir ", Dumper( $dh);
}
__END__
dir doesnotexist.mustnotexist $VAR1 = \*{'::$dh'};
dir . $VAR1 = \*{'::$dh'};
system calls can fail for any reason |