package Tie::Handle;
-use 5.005_64;
-our $VERSION = '4.0';
+use 5.006_001;
+our $VERSION = '4.1';
=head1 NAME
package NewHandle;
require Tie::Handle;
- @ISA = (Tie::Handle);
+ @ISA = qw(Tie::Handle);
sub READ { ... } # Provide a needed method
sub TIEHANDLE { ... } # Overrides inherited method