Well, apparently that wasn't clear, so here is the whole current script, as I see it.
#! /usr/bin/perl @a = qw/a b c/; @a = test(); printf "defined: %s\nsize: %d\n" , defined @a ? 'yes' : 'no' , scalar +@a ; sub test { return () ; }
In reply to Re^4: if (defined @arr) problem
by bart
in thread if (defined @arr) problem
by jeanluca
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |