DB<101> $var=2 => 2 DB<102> sub func { if ( $_[0] > 0 ) { $_[0]--; return OK_CODE; } return ERR_CODE; } DB<103> $err = func ($var); => "OK_CODE" DB<104> $err = func ($var); => "OK_CODE" DB<105> $err = func ($var); => "ERR_CODE"
Cheers Rolf
( addicted to the Perl Programming Language)
In reply to Re^2: Variable assignment error checking
by LanX
in thread Variable assignment error checking
by nathaniels
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |