Help for this page

Select Code to Download


  1. or download this
    use Test::More tests => 4;
use IO::Handle;
...
ok 3 - The object isa IO::Handle
ok 4 - The object isa IO::Handle
  2. or download this
    no strict 'refs'
return *$h{IO} if eval { *$h{IO} };