use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper $row[1];