eval {
        $ioref = *{$arg}{IO};
      };
      undef $@;