Select Code to Download

use strict;
use Data::Dumper; 
...
     }
}
print Dumper \%hash;

$VAR1 = {
          '_W9C2JJDCB' => [
...
                            '<p>why are you capitalizing paragraph tag
+s?</p>'
                          ]
        };

perl -e '@a = 1..5; print @a[1..@a];'