{
    package MyHandle;
    use base qw/ IO::Handle IO::Seekable /;
  }