use IO::Handle ; open my $FH = new IO::Handle, .... ;