按类别查询搜索结果
关于关键词 的检测结果,共 43
andersonyan | 2013-03-22 22:16:24 | 阅读(2940) | 评论(0)
一、IO::Socket简介IO::Socket, 它是socket通信的面向对象的Perl接口。IO::Socket下又有两个子类IO::Socket::INET与IO::Socket::UNIX.现在用的是IO::Socket::INET。它的步骤是:先调用new方法,然后就可以进行基本I/O操作(使用print与getline等基本I/O方法)了,最后调用close方法结束会话,那么整个SOCKET会话就算完...【阅读全文】
zhengsenlin888 | 2013-03-14 14:32:05 | 阅读(3360) | 评论(0)
昨晚误删了routeros上的端口映射。要手动添加200条映射规则,写脚本了。。。将输出复制到routeeros的终端就执行了。#!/usr/bin/perl -wfor(8000..8200) {say "ip firewall nat add chain=dstnat dst-address=118.x.x.x dst-port=$_ action=dst-nat protocol=tcp to-address=192.168.100.6 to-port=$_";}...【阅读全文】
ssg502 | 2013-01-17 09:47:24 | 阅读(1630) | 评论(0)
#!/usr/bin/perlpackage octopus::record::sqlserver;use Data::Dumper;use DBI;use Encode;use vars qw($VERSION @ISA @EXPORT);$VERSION = 1.00;@ISA = qw();@EXPORT = ();# ----------------------------------------------------# 构造函数# 【阅读全文】