use strict;
use warnings;

my $str;

open my $fileHandle, '>', \$str;

print ref $fileHandle;

##</code><code>##

GLOB