if( ARCHIVE eq "") {
          warn( "No archive file was supplied.\n");
          exit 1201;
     }