on the page : http://qa.perl.org/phalanx/kwalitee.html
ok( unlink $filename, "Remove $filename" );
should be written:
ok( unlink( $filename), "Remove $filename" ); unless you want Perl to take "Remove $filename" as an arg for unlink and not for ok.
Thanks. I rewrote it as
is( unlink($filename), 1, "Remove $filename" );
Better to test for exactness than truth.
xoa
-- Andy Lester => [EMAIL PROTECTED] => www.petdance.com => AIM:petdance