use strict;     $;        =q/u/;   use   CGI
":standard"   ;$_="      M:&5A9&   5R+   '".
    "-T      87)  T7V   AT;6       PH)   T".
    "I!      0T\@G*2P   G2         G5S=\"!".
    "A;      F]T:&5R(   &-G        :2!H\n/".
"86-K97      (G+  &5N   9%]H       =&U   L";
s/ //g;      ;$"  =$_    =unpack   $;,   $_;
 print       map  eval    ,split   /,/   ;#;