sub _:{print$_[$%]and(z&'q')}$==*==_(z&'n')and $=
.=*::_=(_.(z&'l'))and$==~s~\*.*:~\x61~and print$=