Lines Matching refs:code
81 $code.=<<___;557 $code.=<<___;591 $code.=<<___;631 $code.=<<___;666 $code.=<<___ if (!$LITTLE_ENDIAN);670 $code.=<<___;678 $code.=<<___ if ($LITTLE_ENDIAN);684 $code.=<<___ if (!$LITTLE_ENDIAN);693 $code.=<<___;707 $code.=<<___;741 $code =~ s/\`([^\`]*)\`/eval $1/gem;742 print $code;