[SNIPPET] Change of mudcheck.pl

[Brian Reus]

I got sick of looking at the long numbers that meant nothing except for the
number of seconds since some date, and wanted an easy to look at file name.
I just changed the restart_mud sub, everything else is the same.  I am
offering it up for comments.  a few problems I have with it right now is, is
that 1:21 am looks the same as 12:01 pm.  Anyone know how to force perl to
use two digits? my perl is a little rusty, been a while since college.


sub restart_mud {
                # Restart the mud                                               
          #
                # Changed 11/10/01 by Zartha
                # Lets get some stuff so the logs names are readable    #
                # Month Day Hr Min                                              
  #
                # Second,Minute,Hour,Month,Year,Day of Year,Day of Week,#
                # Is Day Light Savings                                  #
                ($trash,$min,$hr,$day,$month,$trash,$trash,$trash,$trash) =
                        localtime(time());
                # Add one to month to make 1 to 12                      #
                $month = $month + 1;

                chdir $startPath;
                system ("$exec $port > $logdir/$month$day#$hr$min.log 2>&1 &");
                return;
}

Zartha