$tmp = $line->source_str;
if ($tmp =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}/) {
  push @sources, $tmp;
} else { 
  # print "Help Me\t" . $line->source_str . "\n";
  my @sources = $configs{$fw}->obj($tmp);
}