package IO::Handle;

sub new {
  *{shift(@_)}{NAME}->new(@_);
}