スポンサーサイト 

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

Net::IPv4Addr 

Net::IPv4Addr

使い方

use Net::IPv4Addr qw( :all );

my($ip,$cidr) = ipv4_parse( "127.0.0.1/24" );
my($ip,$cidr) = ipv4_parse( "192.168.100.10 / 255.255.255.0" );
my($net,$msk) = ipv4_network( "192.168.100.30" );
my($broadcast)= ipv4_broadcast( "192.168.100.30/26" );

if ( ipv4_in_network( "192.168.100.0", $her_ip ) )
{ print "Welcome !";
}

コメント

コメントの投稿















管理者にだけ表示を許可する

トラックバック

この記事のトラックバックURL
http://haginov.blog35.fc2.com/tb.php/75-ff17d87d

上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。