#!/usr/bin/perl

use Getopt::Long;
use File::Copy;

$preCorrect = substr($0,0,2);

$correctname=substr($0,0);
#print "\$correctname = $correctname\n";

use lib "/mt/apps/gpms/DateTrans/lib";
use DateTrans qw(monName monNumber timeFormat AmPmFormat dayNumbeFormat);

use lib "/mt/apps/gpms/DateTrans/lib";
use  xsdxsltcheck qw(xsdcheck xsltcheck FGDC2MRFcheck xsl4mrf2fgdccheck);

use lib "/mt/apps/gpms/MifCorrector/lib";
use MifCorrector qw(MifCorrector);
use UpdateMIF qw(UpdateMIF);

use lib "/mt/apps/gpms/MIF2MRF/MIF2MRFVal/lib";
use MIF2MRFVal qw(MIF2MRFVal);


&MIF2MRFVal;