/inc/My/Builder/Windows.pm

 1package My::Builder::Windows;
 2use base 'My::Builder';
 3
 4sub process_xs {
 5	my ( $self, $file ) = @_;
 6
 7	$file =~ s/\\/\//g;
 8
 9	$self->SUPER::process_xs($file);
10}
11
121;