Help for this page
# but never do this! $is_io = UNIVERSAL::isa($fd, "IO::Handle"); $sub = UNIVERSAL::can($obj, "print");
$is_io = $fd->isa('IO::Handle');