view release on metacpan or  search on metacpan

t/07_crashme.t  view on Meta::CPAN

}
_RCFILE_

ok( $pmrc = new Mail::Procmailrc( { 'data' => $rcfile } ) );
ok( $pmrc->dump(), $rcfile );

$rcfile =<<'_RCFILE_';
:0
# SPAMHAUS.ORG BLACKLIST
* SPAMHAUSORGCHECK ?? yes
{
  :0 BH
  * !--.*forwarded message --
  * !^forwarded message:
  * !^-----BEGIN PGP SIGNED MESSAGE-----
  * -1000^0
  * -1000^0   ^Subject: Re:
  *  -200^1   ^[:;#>]
  *  1100^1    1affiliateprograms\.com([^\.]|$)
  *  1100^1    1marketing\.net([^\.]|$)
  *  1100^1    1tips\.net([^\.]|$)
  *  1100^1    4uservers\.com([^\.]|$)
  *  1100^1    abestvalue\.com([^\.]|$)
  *  1100^1    abulkemailsource\.com([^\.]|$)
  *  1100^1    accessonesoftware\.com([^\.]|$)
  *  1100^1    americaint\.com([^\.]|$)
  *  1100^1    amtech2010\.com([^\.]|$)
  *  1100^1    apex-pi\.com([^\.]|$)
  *  1100^1    atf\.net([^\.]|$)
  *  1100^1    bizzbang\.com([^\.]|$)
  *  1100^1    bradreaenterprises\.com([^\.]|$)
  *  1100^1    bulkbarn\.com([^\.]|$)
  *  1100^1    bulkemail\.ca([^\.]|$)
  *  1100^1    bulkemail\.cc([^\.]|$)
  *  1100^1    bulkemail\.nu([^\.]|$)
  *  1100^1    bulk-email-center\.com([^\.]|$)
  *  1100^1    bulkemailgroup\.com([^\.]|$)
  *  1100^1    bulkemailpeople\.com([^\.]|$)
  *  1100^1    bulkemailsoftware\.net([^\.]|$)
  *  1100^1    bulkemailsoftwarecenter\.com([^\.]|$)
  *  1100^1    bulkemailstore\.com([^\.]|$)
  *  1100^1    bulk-email-store\.com ([^\.]|$)
  *  1100^1    bulkers\.net([^\.]|$)
  *  1100^1    bulkhost\.net([^\.]|$)
  *  1100^1    bulkisp\.com([^\.]|$)
  *  1100^1    bulk-isp\.com([^\.]|$)
  *  1100^1    bulkisp\.net([^\.]|$)
  *  1100^1    bulk-isp\.net([^\.]|$)
  *  1100^1    bulkisp\.nu([^\.]|$)
  *  1100^1    bulkispcorp\.com([^\.]|$)
  *  1100^1    bulkispcorp\.net([^\.]|$)
  *  1100^1    bulklist\.com([^\.]|$)
  *  1100^1    bulkmailstore\.com([^\.]|$)
  *  1100^1    bulkmarketing\.net([^\.]|$)
  *  1100^1    bulletproofwebhosting\.net([^\.]|$)
  *  1100^1    cequal2000\.com([^\.]|$)
  *  1100^1    cyberlink1\.com([^\.]|$)
  *  1100^1    cyber-webcom\.com([^\.]|$)
  *  1100^1    datalogical\.com([^\.]|$)
  *  1100^1    data-miners\.net([^\.]|$)
  *  1100^1    desktopserver\.com([^\.]|$)
  *  1100^1    desktop-server\.com([^\.]|$)
  *  1100^1    desktopserver2000\.com([^\.]|$)
  *  1100^1    desktopserver98\.com([^\.]|$)
  *  1100^1    e-announce\.com([^\.]|$)
  *  1100^1    earthonline\.com([^\.]|$)
  *  1100^1    e-mailblaster\.com([^\.]|$)
  *  1100^1    e-maildata\.com([^\.]|$)
  *  1100^1    emaildigger\.com([^\.]|$)
  *  1100^1    email-marketers\.net([^\.]|$)
  *  1100^1    emailmarketingsystems\.com([^\.]|$)
  *  1100^1    e-mailplatinum\.com([^\.]|$)
  *  1100^1    emailsgalore\.com([^\.]|$)
  *  1100^1    e-mailsoftware\.com([^\.]|$)
  *  1100^1    emailsoftwaresolutions\.com([^\.]|$)
  *  1100^1    expressmail-server\.com([^\.]|$)
  *  1100^1    extractorpro\.com([^\.]|$)
  *  1100^1    extractor-pro98\.com([^\.]|$)
  *  1100^1    firstlinesoft\.com([^\.]|$)
  *  1100^1    getyoursoftware\.com([^\.]|$)
  *  1100^1    globaldirectmarketing\.net([^\.]|$)
  *  1100^1    homeuniverse\.com([^\.]|$)
  *  1100^1    hot-new\.com([^\.]|$)
  *  1100^1    intellitec\.net([^\.]|$)
  *  1100^1    intouch2001\.com([^\.]|$)
  *  1100^1    itsfreakinfree\.com([^\.]|$)
  *  1100^1    jbpublications\.com([^\.]|$)
  *  1100^1    jemwebs\.com([^\.]|$)
  *  1100^1    june\.net-psychic\.com([^\.]|$)
  *  1100^1    kingcard\.com([^\.]|$)
  *  1100^1    listguy\.com([^\.]|$)
  *  1100^1    listsorcerer\.com([^\.]|$)
  *  1100^1    list-sorcerer\.com([^\.]|$)
  *  1100^1    madwebextractor\.com([^\.]|$)
  *  1100^1    market-2-sales\.com([^\.]|$)
  *  1100^1    marketing-2000\.net([^\.]|$)
  *  1100^1    marketingmasters\.com([^\.]|$)
  *  1100^1    massmailer\.com([^\.]|$)
  *  1100^1    mass-marketers\.net([^\.]|$)
  *  1100^1    mlmhelp\.com([^\.]|$)
  *  1100^1    natlpark\.net([^\.]|$)
  *  1100^1    netachievers\.com([^\.]|$)
  *  1100^1    netbillions\.com([^\.]|$)
  *  1100^1    nikola\.net([^\.]|$)
  *  1100^1    nitro-net\.com([^\.]|$)
  *  1100^1    prospect-2000\.com([^\.]|$)
  *  1100^1    prospectmailer2000\.com([^\.]|$)
  *  1100^1    realcybersex\.com([^\.]|$)
  *  1100^1    rlyeh\.com([^\.]|$)
  *  1100^1    site-secrets\.com([^\.]|$)
  *  1100^1    softwareshop\.net([^\.]|$)
  *  1100^1    theinternetbiz\.com([^\.]|$)
  *  1100^1    usa-marketers\.com([^\.]|$)
  *  1100^1    usaplaza\.com([^\.]|$)
  *  1100^1    w3-lightspeed\.com([^\.]|$)
  *  1100^1    webmasterszone\.net([^\.]|$)
  *  1100^1    webmole\.com([^\.]|$)
  *  1100^1    web-promotions\.com([^\.]|$)
  *  1100^1    webyellowpages\.com([^\.]|$)
  *  1100^1    windows100\.com([^\.]|$)
  *  1100^1    yug\.com([^\.]|$)
  {
    :0 f
    | ${FORMAIL} -A"X-SBRule: spamhaus.org domain"