sub post_initialize { my( $self ) = @_;
$self->{PERL_LIB} = 'C:\Programmi\Devel\Perl\ActivePerl\588.817\xlib\wince-arm-pocket-wce300';
$self->{PERL_ARCHLIB} = 'C:\Programmi\Devel\Perl\ActivePerl\588.817\xlib\wince-arm-pocket-wce300';
$self->{PERL_INC} = $self->catdir( $self->{PERL_LIB}, "CORE" );
return '';
}
sub tool_xsubpp { my( $self ) = @_;
package MY;
local $self->{PERL_LIB} = 'C:\Programmi\Devel\Perl\ActivePerl\588.817\lib';
return $self->SUPER::tool_xsubpp;
}