$ perl -le 'open my $fh, "file"; print $fh;'
GLOB(0x814cc20)