if($val == $columns[0]){ $val =~ s/$val/$columns[1]/g;