foreach$i(0..13){$_=substr(crypt(substr('KZ[XaGLg[7YKA6U0jY4YyHd:2V\2G(3{]cn:.\g4,H',$i*3,3),'ks'),2,3);s/\// /g;print;}