Select Code to Download

sub unpack2hash
{
...
    }
    return $hash;
}

my $h = unpack2hash(join(' ',(
'l:$songid',
...
'l3:@unk4',
'l4:@notepos'
)), $data);