#!perl -Tw # this is a simple 'drop packets on the floor' plugin sub hook_logging { return DECLINED; }