#!perl #
# # Perl script 'chk.pl' to check input data files required by history files # # Version: 5.20 # Date: 1998, November 2 # ====================================================================== # Main program 'chk.pl': # ~~~~~~~~~~~~~~~~~~~~~~ $PATH=$ARGV[0]; $FILE=$ARGV[1]; if ($FILE ne '') { @ARGV=(); require 'go.pl'; &CHK($PATH,$FILE); } # ====================================================================== 1; #