package on; # ;no egakcap
                      ;                       ;
                      no warnings; ;sgninraw on
                              ;       ;
sub                                                               bus
{"'rekcaH lreP rehtonA tsuJ'tnirp";"print'Just Another Perl Hacker'"}

                            ;{   " "   };
 ; sub                sgninraw {  "  } warnings                bus ;
                                { " }
                        sub lave {"} eval bus
                        {         "         }         
                    ;;$;=$+.lave  ;  eval.+$=;$;;
           $;=~s|[\}\{]| |g;$#.=$; ;$=.#$;g| |[}/{]|s~=;$
           eval$#;                                ;#$lave