http://www.perlmonks.org?node_id=203729


in reply to Re: Use of uninitialized value at?
in thread Use of uninitialized value at?

..as well as prevent seeing any columns that are zero, the empty string, and so on. print "$ar \n" if defined $ar; is probably the way to go in this case.

perl -pe '"I lo*`+$^X$\"$]!$/"=~m%(.*)%s;$_=$1;y^`+*^e v^#$&V"+@( NO CARRIER'