Select Code to Download

*********************

...
close (FH1);

******************************************

foreach my $type ( @{$rbl_list{$omr}{blackholes} })
    {    
                 $blackholes->array ("positive_listings", $type);
    }