Comparing two arrrays
You can use Set::Functional to make the code very short:

use Set::Functional 'difference';
for(difference [@ipfw_ip], [@bill_ip]) {
    `/sbin/ipfw table 11 add $ip`;
    print "$ip blocked\n";
}


Another advantage of the approach above is that you don't have to worry about duplicate entries in the two arrays.