Try adding this to the beginning of your file:

use Data::Dumper;
$Data::Dumper::Useqq = 1;
print Dumper <DATA>;
__DATA__
[download]