sub _ {
    ${_} = q{HBAy@YA\l{}nK@\KbB\K~{}WZG@[CCAm};
    ${_} = { q{{{}}} => [ reverse +split +q{{}} ] };
    ${_}->{q{{{}}}}->[ @_ ];
}
$_ = reverse +_( {}, {} ) ^ qq{\056} x +length &_( {}, {} ) and +print;