Next IPTables::IPv4::IPQueue #11            

Filter based on time of day

    my ($min, $hour, $wday) = (localtime)[1,2,6];

    if (9 <= $hour && $hour <= 17 &&        # 9am to 5pm
        1 <= $wday && $wday <=  5 &&        # Mon to Fri
        $ip->{src_ip} eq "207.8.186.2")
    {
        $ipq->set_verdict($msg->packet_id, NF_ACCEPT);
    }

continued...

            Next © 2003 Michael C. Toren