#!/usr/bin/perl
my @dns=`nslookup www.baidu.com `;
@ip;
@iptable;
for(2..$#dns)
{
$row = $dns[$_];
if($row =~ /\d+/)
{
$row =~ /(\d+\.\d+\.\d+\.\d+)/;
push @ip, $1;
}
}
foreach (@ip)
{
/\d+\.\d+\.(\d+)\.\d+/;
push @iptable, $1;
}
print @dns;
print "\n";
foreach(@iptable)
{
print $_, "\t";
}
分享到:
相关推荐
用perl实现的获取eth0 ip地址的方法,主要是打开ifconfig读取信息,然后用正则表达式来匹配,从而获取到ip地址,比较简单。
linux centos7的perl-IO-Socket-IP-0.21-5.el7.noarch.rpm包
附件的perl包可以将ip地址解析为地理位置,使用的是QQWry本地库,解析准确率很高,更新QQWry即可实现解析信息的更新。 安装附件的包需要一些依赖条件。
perl-Date-Manip-6.24-1.el6.noarch.rpm perl-Date-Manip-6.24-1.el6.noarch.rpm
perl脚本perl脚本perl脚本perl脚本
Perl语言参考手册中文html Perl语言参考手册中文html Perl语言参考手册中文html Perl语言参考手册中文html Perl语言参考手册中文html
Perl是Practical Extraction and Report Language的缩写,它是由Larry Wall设计的,并由他不断更新和维护,用于在UNIX环境下编程
perl中文教程,网页形式教程. 内容比较全面.
最新perl中文教程
事实上,你将看到,它的许多特性是从C语言中借用来的。 .与脚本语言一样,Perl不需要编译器和链接器来运行代码,你要做的只是写出程序并告诉Perl来运行而已。这意味着Perl对于小的编程问题的快速解决方案和为大型...
perl获取文件修改时间,
perl参考手册(中文)perl参考手册(中文) perl参考手册(中文)
Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0版本,Perl-5.10.0...
所有的PERL对象编程都把对象‘形象化’为某个变量,这里的SOCKET句柄 对象也不例外,调用此方法的返回值便为SOCKET对象变量了。这里使用参数为 简单参数模式,在双引号或但引号内的socket地址结构为'主机IP或域名:...
perl语言中的变量类型 PERL 学习中总结
windows Strawberry Perl 5.32最新版本 ,适合调试 perl windows Strawberry Perl 5.32最新版本 ,适合调试 perl windows Strawberry Perl 5.32最新版本 ,适合调试 perl windows Strawberry Perl 5.32最新版本 ...
Perl通常位于/usr/local/bin/perl或/usr/bin/perl中。你可以在Internet用匿名FTP免费得到它,如ftp://prep.ai.mit.edu/pub/gnu/perl-5.004.tar.gz。 安装过程为: (1)解压: $gunzip perl-5.004.tar.gz $tar xvf - &...
Perl5.0中文教程.
前发表的“Perl 在 ASIC 中的应用”系列整理成合集,分为: 基础篇,主要介绍 Perl 的基本语法、数组、哈希、输入输出、函数等。 高级篇,介绍 Perl 的正则表达式、模块 module、面向对象 OOP、 多进程等。 实战篇,...
perl语言实现下载某个网页的信息,并从里面提取数据表的内容