perl 域名查询程序

web学习吧　2006-12-16　来源:　收藏本文

#  perl 国内域名查询程序
#  flybird@chinaasp.com
#  2000-9-22
#  perl 写socket程序确实很简单。

use IO::Socket::INET;
$fqdn="ourstory.com.cn";
$server = 'whois.cnnic.net.cn';
$sock  = IO::Socket::INET->new("$server:43") || die "fail";
print $sock "$fqdn\n";
@ret=<$sock>;
print "@ret";

上一篇：在Linux下访问MS SQL Server数据库下一篇：Perl渐成气候

【发表评论】【收藏本文】【推荐好友】【打印本页】【关闭窗口】

最新相关文章

热点教程

·用 perl 实现文件上传
·在Linux下访问MS SQL Server数据库
·Perl操作Mysql数据库
·LB5000XP论坛配合SERV-U获取系统管理员权限
·Perl渐成气候
·访问CGI变量
·惨绝人寰的蓝点linux2.0配置perl cgi
·perl 调试工具 ptkdb 简单介绍
·Perl是什么？
·PERL与MySQL（三、DBI接口）
·Windows95/98,NT下如何发EMAIL
·用Perl语句来代替常用的操作系统命令
·获取随机的由大小写字母和数字组成的八位密码
·用Perl制作页面计数器 (转载于上海热线)
·Perl在NT下的快速简便安装方法（转）
·如何在WINDOWS ME/98上以APACHE安装PERL(转)
·perl连接access数据库
·绝对路径与相对路径祥解
·用perl访问mysql数据库
·尝试用sql查询语句操纵普通文本数据库！使用

实用信息推荐