Snort::Rule

Blaas :: Reël 'n Perl uitbreiding vir dinamiese bou snuif reëls.
SINOPSIS
  gebruik Blaas :: Reël;
  $ Reël = Blaas :: Rule-> nuwe (
        -action => 'waarskuwing',
        -proto => 'tcp,
        -src => 'enige,
        -Sport => 'enige,
        -dir => '->',
        -dst => '192.188.1.1,
        -dport => '44.444',
  );
  $ Rule-> kies ('msg', 'Reël Test ");
  $ Rule-> kies ('drumpel "," tipe limiet, spoor by_src, tel 1, sekondes 3600);
  $ Rule-> kies ('sid "," 500,000 ");
  druk $ rule-> string () "n".
  OF
  $ Reël = 'waarskuwing tcp $ SMTP_SERVERS enige -> $ EXTERNAL_NET 25 (msg: "bloeding-SOOMBELEID SMTP Amerikaanse Top Secret PROPIN"; vloei: to_server, gestig; inhoud: "Behoudens | 3A |"; PCRE: "/ (TOPsSECRET (? = // (25)? | TS) // [sw, / - -] * PROPIN [sw, /] * X [1-9]) / ism "; CLASS TYPE: beleid skending; sid: 2002448; Rev: 1;);
  $ Reël = Blaas :: Rule-> nuwe (-parse => $ reël);
  druk $ rule-> string () "n".
Dit is 'n baie eenvoudige snuif reël voorwerp. Dit is ontwikkel om voorsiening te maak vir geskrewe dinamiese reël skepping. Ideaal kan jy dinamiese neem 'n lys van slegte gashere en die bou van 'n verskeidenheid van snuif reël voorwerpe uit die lys. . Skryf dan dat die lys met behulp van die metode string () om 'n snuif reëls lêer

Vereistes :

• Perl