Fixed ASN lookups

This commit is contained in:
MaffC 2013-03-17 05:42:24 +00:00
parent 1a8d127d3f
commit 01518e9eee
1 changed files with 2 additions and 2 deletions

View File

@ -28,12 +28,12 @@ while($witerator->isnt_exhausted) {
$origin = $_ if /^origin:/;
$route = $_ if /^route:/;
}
$descr =~ s/.*:[ ]+//;
if($target =~ /^AS.*/i) {
$asnum =~ s/.*:[ ]+//;
$asname =~ s/.*:[ ]+//;
print "$target advertised by $asnum - $asname\n";
print "$target is $descr\n";
} else {
$descr =~ s/.*:[ ]+//;
$origin =~ s/.*:[ ]+//;
$route =~ s/.*:[ ]+//;
print "$route advertised by $origin - $descr\n";