Help for this page
while(<FILE>){ #line is in $_ }
while(<FILE>){ chomp; ... $columns[0]=~tr/%//d; # When you want to get rid of single characters +tr/// should be better than s/// #do what ever you want with @columns.. }