Re^2: Split function

[ColonelPanic]

in reply to Re: Split function
in thread Split function

If you are going to do error checking, why not do it properly? Check that all fields are present:

(my ($s, $a, $c, $r) = split /[,\t]/) < 4 and die;

or:

die if not defined $r;

(Also, you had a typo in your code: extra paren)