Help for this page

Select Code to Download


  1. or download this
    $ perl -MScalar::Util=reftype -le'open my $fh, "<", \$buf; print refty
    +pe($fh)'
    GLOB
    
  2. or download this
    $ perl -le'open my $fh, "<", \$buf; print $fh; printf "0x%x\n", 0+$fh'
    GLOB(0x814ec28)
    0x814ec28