perl 204

#Perl
Perl练习——九九乘法表

#! perl -w use strict; use Win32::OLE; use Win32::OLE::Const 'Microsoft Excel'; $Win32::OL…

2015-12-14 689

#Perl
多线程子域名 bruteforcer – dnsspider

#!/usr/bin/env python # # dnsspider.py - multithreaded subdomain bruteforcer # # bruteforc…

2015-12-14 376

#Perl
Perl 列出所有 DBI 驱动程序

#!/usr/bin/perl use strict; use DBI; my @drivers; @drivers = DBI->available_drivers(); …

2015-12-14 850

#Perl
自动从ftp下载文件(不回显输入密码)

#!/usr/bin/perl #=========================================================================…

2015-12-14 217

#Perl
Perl 添加 Windows 系统帐号

#!/usr/bin/perl -w use Win32::NetAdmin; $host = ''; $username = "userName"; $password = "p…

2015-12-14 752

#Perl
Perl Socket server waiting for clients

use IO::Socket; $server = IO::Socket::INET->new ( LocalPort => 1247, Type => SOCK…

2015-12-14 916

#Perl
Perl 解析 HTTP Header

#!/usr/bin/perl use Socket; my $proto = getprotobyname('tcp'); socket(Server,PF_INET,SOCK_…

2015-12-14 434

#Perl
Perl解決走迷宮問題

#!/usr/bin/perl # # Useage: maze.pl # # use strict; use warnings; ### main program my @maz…

2015-12-14 751

#Perl
Perl 文件测试符

-e 该“文件名”是否存在 -f 该“文件名”是否为文件 -d 该“文件名”是否为目录 -b 该“文件名”是否为一个块设备 -c 该“文件名”是否为一个字符设备 -S 该“文件名”…

2015-12-14 858

#Perl
用Perl编写的一个小的词法分析器

#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ # # @File : Lexical_…

2015-12-14 571

#Perl
windows下Perl删掉过期文件

#!/usr/bin/perl use Tk; use Encode; use Win32::API; use threads; use Encode::CN; use Tk::B…

2015-12-14 154

#Perl
例子:将文件每行存入数组中

#!/usr/bin/perl -w #use strict; #严格perl的语法,使用它后所有变量必须都用my声明。 use CGI qw(:all); open(FILE,"…

2015-12-14 386
1 7 8 9 10 11 17