$mname = substr( $line, 0, 3 );
    $mon = $mhash{$mname};
    $day = sunstr( $line, 4, 2 );