in reply to question about variables from new perl user

Perl is not PHP. Associative arrays use curly braces:
$temp{headers}{etag}

Square brackets are for arrays.

Disclaimer: I'm not saying it will work for your problem.

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord }map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,