Help for this page

Select Code to Download


  1. or download this
    sub second_thursday {
        my ($dow, $dom) = (split " ", scalar localtime)[0,2];
        ($dow eq "Thu" && $dom > 7 && $dom < 16 ) 
                    ? 1 : 0;
    }