substr($line,-3,2)=''; #assuming your line ends with a newline $line =~ tr/"//d; #deletes all quotes in your text