Lines Matching refs:code
39 $code.=<<___;
692 $code.=<<___;
705 $code.=<<___;
722 $code.=<<___;
744 $code.=<<___;
760 $code.=<<___;
770 $code.=<<___;
784 $code.=<<___;
793 $code.=<<___;
806 $code.=<<___;
821 $code.=<<___;
825 $code.=<<___;
858 $code.=<<___;
869 $code.=<<___;
899 $code.=<<___;
1000 $code =~ s/\`([^\`]*)\`/eval($1)/gem;
1002 print $code;