Help for this page
$octet ||= $_ if /($hacklist =~ m~((\d{1,3}\.){3}\d{1,3})~)/;
my $hacklist = "hack.txt";