package My::Builder::Windows;
use base 'My::Builder';
sub process_xs {
my ( $self, $file ) = @_;
$file =~ s/\\/\//g;
$self->SUPER::process_xs($file);
}
1;
package My::Builder::Windows;
use base 'My::Builder';
sub process_xs {
my ( $self, $file ) = @_;
$file =~ s/\\/\//g;
$self->SUPER::process_xs($file);
}
1;