#!%%PERL5%% -- # -*- Perl -*- # # do nothing # # $Id: gmat.nop 2.0 1995/04/01 21:09:46 norm Exp $ # # $BASEVERS = "0.1"; $RCS_ID = '$Id: gmat.nop 2.0 1995/04/01 21:09:46 norm Exp $'; # ' ($PROGNAME = $RCS_ID) =~ s/^.Id: (\S+) .*$/$1/; ($PATCHLEVEL= $RCS_ID) =~ s/^.Id: \S+ \d+\.(\d+) .*$/$1/; $VERSION = "$BASEVERS patchlevel $PATCHLEVEL"; $EXECDIR = "."; $EXECDIR = $1 if $0 =~ /^(.*)\/[^\/]+$/; ###################################################################### exit 0;