Help for this page

Select Code to Download

Select or download this

    my %refs;
    $str= pack( "N", 0+$ref );
    $refs{0+$ref}= $ref;

Select or download this
$ref= $refs{unpack("N",$str)};