# OPEN THE ORIGINAL FILE
    die "Can't open file for reading : $!\n" 
      unless open(INFILE,"<$_");
    # OPEN THE NEW FILE
    die "Can't open file for writing : $!\n" 
      unless open(OUTFILE,">$arcfile");