Select Code to Download

#!/usr/bin/perl -T

...

print "Content-type: text/plain\n\n";
print Dumper $response;