perl -le 'print $]; @a = split/,/,"nick,1,2,,56,88"; print scalar @a' ; perl -V:osname 5.008005 6 osname='linux';