「あるIP addressがどのVLANか調べたい?tag名がわかればいいですか?じゃ、その一覧もらえます?」 > cat access.txt 10.10.0.12 10.10.2.100 10.10.1.65 10.10.1.200 > cat vlan.txt 10.10.0.0/24 sales 10.10.1.1/25 acconting 10.10.1.128/25 tech 10.10.2.0/24 devs > cat example2.pl #!/usr/bin/perl use strict; use warnings; use NetAddr::IP; my ( $vlan_filename, $access_filename ) = @ARGV; open my $vlan_filename_fh, '<', $vlan_filename or die "cann
またPerlの力を借りる必要が出てきた。自分はプログラマじゃないっつーの。プログラマと名乗るなら、はなくそほじりながら10分くらいで書いてよ。設立当初から培ってきた技術力とノウハウが泣くよ。つーことで、ネットワーク管理者のありがちな仕事をPerlで解決するシリーズ(になるはず)。 管理者の基本。subnetを切って、default gatewayを決める。簡単ですね。「10.10.1.0/24なら10.10.1.254でも使っとく?OK、じゃ、subnetの最後のIP addressということで統一しましょうか。CIDRの一覧ちょうだい。default gatewayの一覧作成しとくから」 > cat cidr.txt 10.10.0.0/23 10.10.2.0/24 10.10.3.0/24 > cat example1.pl #!/usr/bin/perl use strict;
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く