「ある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;
前提は以下。 www/apache20 mail/postfix databases/postgresql81-server www/mod_perl2 lang/perl5.8 URLはhttp://example.org/rt/ FreeBSDInstallGuideも参考に。 ちなみに、 > pkg_info -r rt-3.4.5 | grep -E ^Dep | wc -l 122 なので、覚悟すること。 pkgtools.confに追加。 MAKE_ARGS = { # WITH_APACHELOG doesn't build 'devel/p5-Log-Dispatch' => '-DWITHOUT_APACHELOG -DBATCH', 'www/rt3*' => '-DWITH_APACHE2 -DINITIAL_INSTALL DB_TYPE=Pg DB_HOST=l
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く