print "%d\n", $string; #### printf "%d\n", hex( $string ); #### sub myHex { no warnings 'digit'; hex( $_[0] }; } printf "%d\n", myHex( $string );
## printf "%d\n", hex( $string ); ##
## sub myHex { no warnings 'digit'; hex( $_[0] }; } printf "%d\n", myHex( $string );