Help for this page

Select Code to Download

Select or download this

unless (cpen (FH, $myhashname)) {
print STDERR "Can not open file\"$myhashname\": $!n\n";
exit;}

Select or download this

open (FH, $myhashname)
    or die "Can not open file\"$myhashname\": $!";