my $fh = select();
select(FH);
select(*FH);
select($fh);
select(*$fh)
