$ perl -we 'undef=undef' $ #### $ perl -we 'undef=0' Modification of a read-only value attempted at -e line 1. $ #### @flds = split(/(\t)/, $value);
## $ perl -we 'undef=0' Modification of a read-only value attempted at -e line 1. $ ##
## @flds = split(/(\t)/, $value);