C:\>perl -e "open my $fh, q|< test.txt| or die $!;print ref $fh"
GLOB