Help for this page
$FH = "a scalar"; @FH = qw/an array/; ... bar baz quux
$main::FH = 'a string'; print "nope" if not defined *FH{IO}; ... __output__ nope