?? gasn
字號:
#!/usr/bin/perl## converts internic netinfo/asn.txt to flow-tools <value> <name> format#while (<>) { chomp; next if (!/^\s*\d+/); $_ =~ s/^\s+//g; @f = split; if ($f[0] =~ /-/) { ($high, $low) = split(/-/, $f[0]); for ($asn = $high; $asn <= $low; ++$asn) { print "$asn $f[1]\n"; } } else { print "$f[0] $f[1]\n"; }}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -