Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
    
    my($yes2)=defined $bad and -f $bad;   #2nd parens removed,
    die "yes2=$yes2\n" if $yes2;          #but dies here; why?