diff --git a/script/par.pl b/script/par.pl
index e54c064..f47e6ba 100644
--- a/script/par.pl
+++ b/script/par.pl
@@ -553,6 +553,7 @@ if ($out) {
         my %written;
 
         foreach (sort keys %files) {
+            s{\\}{/}g if (!ref($_) && $Config{_delim} eq '\\');
             my ($name, $file);
 
             foreach my $dir (@inc) {