Perl实现的Linux下socket代理服务器(perl脚本执行命令)快来看 #!/usr/bin/perl $auth_enabled=0; $auth_login="hidden"; $auth_pass="hidden"; $port=44269; use IO::S...随心笔谈1年前2710
perl实现的两个文件对比并对数据进行筛选的脚本代码(perl字符串)没想到#!/usr/bin/perl my %scyjm; open (CONTACT,"f:\\perl\\f.txt")||die("can not open the file!"); while...随心笔谈1年前2670
Perl实现遍历目录例子(perl数组push)学到了#!/usr/bin/perl use strict; use warnings; use Encode qw/from_to/; my $path="e:/CSS Design"; my ...随心笔谈1年前2920
Perl批量下载Gmail附件的代码(google批量下载插件)不要告诉别人use Mail::POP3Client; use MIME::Parser; my $U='User.Name@gmail.com'; my $P='uSeR.pAsSwORd'; my $X=ne...随心笔谈1年前2910
perl批量查询ip归属地的方法代码(perl 批量注释)这都可以?#!/usr/bin/perl use IP::QQWry::Decoded; use Encode; use utf8; binmode(STDIN, ':encoding(utf8)'); #...随心笔谈1年前2740
perl控制流介绍(if条件,while,for循环,foreach)(perl脚本windows下如何运行)学会了吗 1. 语句块:{ }之间的部分即为BLOCK语句块。 2. 条件语句:if ( expression ) BLOCK; if ( expression ) BLOCK1else BLOC...随心笔谈1年前3590
perl操作MongoDB报错undefined symbol: HeUTF8解决方法(mongodb error number 51)新鲜出炉 因为shell操作mongo比较麻烦,只好尝试使用perl操作mongo,perl需要操作mongodb必须先安装相应的驱动,大部分人使用cpan安装,个人觉得太麻烦,使用cpanm安装perl模...随心笔谈1年前2750
perl数据库添加、删除、更新、查询操作例子(perl基本数据类型)一看就会 #!/usr/bin/perl use strict; use warnings; use DBI; my $db_name="geneva_admin"; my $db_passwd="gene...随心笔谈1年前2980
Perl数组排序学习笔记(二维列表排序 python)学到了 本文我们学习如何用Perl对字符串或者数字数组进行排序。 Perl有个内置函数叫做sort毫无疑问的可以排序一个数组。 其最简单的形式是传递一个数组,它会返回排序后的元素组成的数组。@sorted...随心笔谈1年前2800
Perl字符串比较和整数比较的区别详解(perl查找字符串位置)一看就会 本文向大家介绍一下Perl字符串比较和整数比较. Perl语言中Perl字符串可分为单引号和双引号字符串,那么如何进行Perl字符串比较呢, 请看本文详细介绍: 本文和大家重点讨论一下Perl字符...随心笔谈1年前3400