usage: new IO::Handle at a.pl line 4