use parent 'Win32::Evt::Darllenydd';
...
package Win32::Evt::Darllenydd;
use Carp();
sub Last { Carp::croak( "Last unimplemented" ); }
sub GetNth{ Carp::croak( "GetNth unimplemented" ); }
...