『第4回デスマコロシアム』私の Perl (57)

はじめに 『第4回デスマコロシアム』に参加しました。今回のルールは、 $&(*,.02468:<>@BDFHJLNPRTVXZ\^`bdfhjlnprt$(,048<@DHLPTX\`dhlpt$*06