Attempt to free unreferenced scalar: SV 0x9730848, Perl interpreter: 0x970a008 at /tmp/perm2 line 17, <DATA> line 1.