=-> perl -c fwanalysis
elseif should be elsif at fwanalysis line 197.
syntax error at fwanalysis line 197, near ") {"
syntax error at fwanalysis line 209, near "}"
fwanalysis had compilation errors.

##</code><code>##


my $ip1 = $ips[0][0];
my $times = $ips[0][1];
whois($ip1);
evidence($ip1,$times);
 
 
# Second ip
 
my $ip2 = $ips[1][0];
my $times2 = $ips[1][1];
whois($ip2);
evidence($ip2,$times2);
 
# Third ip
 
my $ip3 = $ips[2][0];
my $times3 = $ips[2][1];
whois($ip3);
evidence($ip3,$times3);
 
# ...

##</code><code>##

foreach my $i (0..14) {
  my($ip,$times) = @{$ip[$i]};
  whois($ip);
  evidence($ip,$times);
}

##</code><code>##

  if ($_ =~ $ip){