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

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