#!/usr/local/bin/perl

while(<>){
 s/\\\\//g;
print;}