标题: 二进制IP地址转换成十进制 [打印本页]

---

作者: cnangel    时间: 2004-8-7 14:29     标题: 二进制IP地址转换成十进制

10001000.10001000.10001000.10001000

1. join ';.';,map {oct("0b$_")} split /\./,"10001000.10001000.10001000.10001000";

复制代码

1. #!/usr/bin/perl
2. $aa="10001000.10001000.10001000.10001000";
3. $aa=~s/\.//g;
4. $ip = join(".",unpack("C4", pack("B32",$aa)));
5. print "$ip\n";

复制代码

---

欢迎光临 星星博客 (http://commerce.huhoo.net/)

Powered by Discuz! 7.0.0