use Data::Dumper; print Dumper($sth);