use Data::Dumper::Simple;
print Dumper($results);