open IP, $file or (print "\n\tNo kin d\n" , print "\n\tI bet ye dinna see this\n" , return 0 ) ;
That should be written thus:
open IP, $file or do { print "\n\tNo kin d\n"; print "\n\tI bet ye dinna see this\n"; return 0};
Dave.
In reply to Re: Bug Bear - or
by dave_the_m
in thread 'or' Bug Bear
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |