perl批量查询ip归属地的方法代码（perl 批量注释）这都可以？
#!/usr/bin/perl use IP::QQWry::Decoded; use Encode; use utf8; binmode(STDIN, ':encoding(utf8)'); #...
Perl批量下载Gmail附件的代码（google批量下载插件）不要告诉别人
use Mail::POP3Client; use MIME::Parser; my $U='User.Name＠gmail.com'; my $P='uSeR.pAsSwORd'; my $X=ne...
Perl实现遍历目录例子（perl数组push）学到了
#!/usr/bin/perl use strict; use warnings; use Encode qw/from_to/; my $path="e:/CSS Design"; my ...
perl实现的两个文件对比并对数据进行筛选的脚本代码（perl字符串）没想到
#!/usr/bin/perl my %scyjm; open (CONTACT,"f:\\perl\\f.txt")||die("can not open the file!"); while...
Perl实现的Linux下socket代理服务器（perl脚本执行命令）快来看
#!/usr/bin/perl $auth_enabled=0; $auth_login="hidden"; $auth_pass="hidden"; $port=44269; use IO::S...
perl实现检测服务器中的服务是否正常脚本分享（服务器端测试）居然可以这样
#!/usr/bin/perl # use strict; use IO::Socket; my @servers; $servers[0]=['180.153.100.93',2222]; $ser...
Perl实现删除Windows下的图片缓存缩略图Thumbs.db（perl删除空行）干货满满
#!/usr/bin/perl use strict; use warnings; my $path="C:/FlexApp/xx"; my $filecount=0; sub parse_env {...
Perl学习笔记之文件操作（perl常用函数）一篇读懂
#! c:/perl/bin/perl -w use utf8; use strict; use warnings; my $filename='test.txt'; if(open(MYFILE...
Perl学习笔记之CPAN使用介绍（perl -c）万万没想到
CPAN（Comprehensive Perl Archive Network:全面的Perl存档网络）是查找任何Perl有关的东西的中心仓库。它包含从整个Perl社区收集来的智慧：成百上千的 P...
Perl学习教程之单行命令详解（perl脚本执行命令参数）这样也行？
前言 本文主要给大家介绍了关于Perl单行命令的相关内容，分享出来供大家参考学习，下面话不多说了，来一起看看详细的介绍吧。 与One-Liner相关的perl参数 -a 自动分隔模式，用空格分隔$...