Select Code to Download

$ perl -we 'undef=undef'
$

$ perl -we 'undef=0'
Modification of a read-only value attempted at -e line 1.
$

@flds = split(/(\t)/, $value);