Help for this page

Select Code to Download


  1. or download this
    my ( $y, $m, $d ) = ( localtime )[ 5, 4, 3 ];
    ++$m;
    $year += 1900;