Mailing List Archive

bug perl 5.001n
BUGS on 5.001 , 5.001m and 5.001n on sun-solaris 2.4
----------------------------------------------------

# A full path in this (at least ?) 2 commands (link and rename) failed
# those 2 files are on same file system
link('/export/home/francois/ids2/dps8/perl/xx2','/export/home2/francois/xxll
') || warn "link
failed";

rename('/export/home/francois/ids2/dps8/perl/xx2','/export/home2/francois/xx
ll')|| warn
"rename failed" ;

# tested a value of an hash array defined it !
if ($h{'unknown'}) {
print "first test: key exists\n";
}
# key is not created : OK

if ($h{'unknown'}->{'foo'}) {
# value of key unknown is now created !
}

if ($h{'unknown'}) {
# STRANGE the key exists now
print "second test FAILED: key exists \n";
}

The execution gives : "second test FAILED: key exists"