-
perl上下文介绍
所属栏目:[大数据] 日期:2020-12-16 热度:57
在标量上下文中,所求的表达式返回一个标量值;而在列表上下文中,所求的表达式返回一个标量值的列表 。 $para = @_ 这是标量上下文,$para得到的是@_中元素的个数。 my ($para) = @_ 这是列表上下文,$para得到的是@_中的元素值。 具体是什么上下文是由等号[详细]
-
perl中数组与列表
所属栏目:[大数据] 日期:2020-12-16 热度:54
列表是标量的集合 数组是存储列表的变量 ? 更精确的说,列表指的是数据,而数组指的是变量。列表的值不一定放在数组里,但每一个数组变量都一定包含一个列表(即使列表可能是空的); ?[详细]
-
Perl 利用Win32::OLE操作Excel 技巧和诀窍
所属栏目:[大数据] 日期:2020-12-16 热度:188
我翻译这个教程的目的就是为了回答Perl利用 Win32::OLE操作Excel 的有关问题,这些问题会经常遇到,但是没有一个浅显易懂的教程。如果你懂Perl,又有点VBA的知识,那么这篇短小精悍的教程你肯定轻松拿下。 我要涵盖许多主题,从处理日期和执行边界,大小列,[详细]
-
perl dancer框架小试
所属栏目:[大数据] 日期:2020-12-16 热度:111
之前就看过perl的dancer框架,但是一直没有真正用过。这次部门里面有需求,就自己试着做来玩玩。 这次的作业的内容是change requesrts的管理。(做之前感觉很简单,但是做的时候还是碰到了许多问题。) 现在也大概完成了,传上来分享一下,顺便留个档。 附件[详细]
-
perl install error
所属栏目:[大数据] 日期:2020-12-16 热度:130
装了一个perl的东西。缺包,错误:Can't locate Class/HPLOO/Base.pm 各种百度谷歌, 大体意思是缺包。各种测试 最后 install Class::HPLOO OK了 ![详细]
-
perl install error
所属栏目:[大数据] 日期:2020-12-16 热度:144
装了一个perl的东西。缺包,错误:Can't locate Class/HPLOO/Base.pm 各种百度谷歌, 大体意思是缺包。各种测试 最后 install Class::HPLOO OK了 ![详细]
-
PERL实现多线程的一些demo程序
所属栏目:[大数据] 日期:2020-12-16 热度:72
以前学perl时候的一些笔记。主要是perl来写多线程的程序,整理一下 1 #!/bin/perluse threads;use threads::shared; # 涉及到一些进程间变量的共享,用这个模块 my $process = 4;my $child_num = 0; print $threads::VERSION.chr(10); while (1) { if ($chil[详细]
-
学习perl点滴(二)
所属栏目:[大数据] 日期:2020-12-16 热度:100
shift用法: #!/usr/bin/perlsub check_required_items { my $who = shift; print "$whon"; my %who_items = map {$_,1} @_; my @required = qw(preserver sunserver water_bottle jacket); for my $item (@required) { unless ($who_items{$item}) { print[详细]
-
使用ec-perl
所属栏目:[大数据] 日期:2020-12-16 热度:108
? ? use ElectricCommander; ? ? $cmdr = ElectricCommander-new({ ? ? server ? ? ?= ?"oswaldl-MSI",? ? ? port ? ? ? ?= ?"8888" ? ? }); ? ? $cmdr-login("admin","changeme"); ? ? $jobs=$cmdr-getJobs(); ? ? print $jobs;[详细]
-
perl和js对web请求的base64 encode/decode
所属栏目:[大数据] 日期:2020-12-16 热度:81
最近做个项目,?需要用js来进行base64?encode,?然后用perl来base64?decoce.?做完之后,?记录一下. 首先是javascript的base64?encode,?查了下,?要么是用jquery,?要么就是自己定义base64encode的方法.?选择了后者. script? ????var?paraStr?=?"in=1"+location.hr[详细]
-
软件制作:Perl
所属栏目:[大数据] 日期:2020-12-16 热度:192
? ???????? Perl 2exe是一个将 Perl 脚本转换成windows上的可独立执行的可执行程序(*.exe)的工具,这样,你就可以不用装 Perl 而在windows系统上运行这个可执行程序。 ? ???????? 在网上找了好久没有找到满意的 perl2exe 和相应的 key ,于是自己写了一个注[详细]
-
Perl 获取cpu使用率
所属栏目:[大数据] 日期:2020-12-16 热度:122
1、先了解/proc/stat文件信息 ??? 在Linux/Unix下,CPU利用率分为用户态,系统态和空闲态,分别表示CPU处于用户态执行的时间,系统内核执行的时间,和空闲系统进程执行的时间。平时所说的CPU利用率是指:CPU执行非系统空闲进程的时间 / CPU总的执行时间。 ??[详细]
-
Perl内置特殊变量
所属栏目:[大数据] 日期:2020-12-16 热度:148
一、 正则表达式 特殊 变量: 1、 $n ? :包含上次模式匹配的第n个子串 2、 $ :前一次成功模式匹配的字符串 3、 $` ? :前次匹配成功的子串之前的内容 4、 $’ :前次匹配成功的子串之后的内容 5、 $+ :前一次使用括号的模式匹配的字符串. 二、 文件句柄 特殊[详细]
-
perl中last的用法
所属栏目:[大数据] 日期:2020-12-16 热度:134
在C语言中,如果想要退出一个循环,我们可以使用break。在perl中,没有beak这个关键字,但是perl却也提供了另外一个关键字,让程序从循环中跳出,那就是last。现在我们就看一下last的使用。 #! /usr/bin/perl use strict; use warnings; my @array = (1 .. 1[详细]
-
perl的理解
所属栏目:[大数据] 日期:2020-12-16 热度:147
? ——但是我不能骗我自己,我天生就是一个伟大的程序员。—— ????? 上面是今天学到的用来自我吹嘘调侃的话,超自信的调侃自我,有益身心健康,哈哈。 ??????在速递项目中接触到perl。perl 有两个显著的优点,一是强大的正则表达式,二是跨操作系统的可移植[详细]
-
遍历文件夹的方法比较
所属栏目:[大数据] 日期:2020-12-16 热度:56
本贴对三种遍历文件夹方法比较。 1. 使用File::Find; 2. 递归遍历。(遍历函数为lsr) 3. 使用队列或栈遍历。(遍历函数为lsr_s) 1.use File::Find #!/usr/bin/perl -W # # File: find.pl # Author: 路小佳 # License: GPL-2 use strict; use warnings; use Fil[详细]
-
perl advent
所属栏目:[大数据] 日期:2020-12-16 热度:148
关于Perl Advent Calendar? perl社区有这样一个活动.在每年的最后一个月,也就是从十二月开始,一直到圣诞节前的 24 天,在perl的社区会有大牛写点小短文,每天一篇,叫做 Advent.非常的热闹和有意思,这个活动会在直到圣诞节结束.? http://perladvent.pm.org? 这[详细]
-
perl对微信语音信息的处理,以及将语音信息合并
所属栏目:[大数据] 日期:2020-12-16 热度:175
小弟,最近迷恋上了微信,与女友聊天基本都是微信,但是一条一条信息听起来太麻烦,小弟就设想能否将信息一条一条按照顺序,合并起来。但是不得不吐槽的是微信的语音存放文件夹太恶心了,名字毫无顺序,每个文件夹下还有子文件夹。有了思路,那就行动吧,首[详细]
-
perl on heroku
所属栏目:[大数据] 日期:2020-12-16 热度:195
写在前面: ?? ? ? ? ? ?heroku 是一个类似于google app engine的Paas 云平台,可以在上面进行多种web应用的部署, ? ? ? ? ?基本快把流程走通了,真是挖了一个大坑啊,不过生命在于折腾。? 在windows下安装Mojolicious::Command::deploy::heroku ? (这个模[详细]
-
perl版本控制模块App::perlbrew
所属栏目:[大数据] 日期:2020-12-16 热度:181
? ? ? 1.环境 ? ? ? centos6.2 x64 其实环境无关 ? ? ? 2安装方法? ?? su root perl -v 5.10.0 #配置cpan perl -MCPAN -e shell # 手动配置,一路回车。 mirror url 填 http://mirrors.163.com/cpan cpan[1]o conf init 回车 cpan[2] install App::cpanminus[详细]
-
perl中如何将按hash的排序方法
所属栏目:[大数据] 日期:2020-12-16 热度:59
如果是按ASCII码排序,则代码如下: foreach my $key ( sort { $hash{$a} cmp $hash{$b} } keys %hash ) { my $value = $hash{$key}; # do something with ($key,$value) } foreach my $key ( sort { $hash{$a} cmp $hash{$b} } keys %hash ) { my $value =[详细]
-
perl和python
所属栏目:[大数据] 日期:2020-12-16 热度:85
最近总在perl和python间切换作业,两者语法大不相同,机制也有些差别,忍不住吐槽一下。 语言之间优劣的比较是毫无意义的,因为各有所长: perl内建了正则 python内建复数型别 perl擅长文字处理,python擅长数值处理. python的内置类型有标量,list,tuple,d[详细]
-
Perl中的多行注释
所属栏目:[大数据] 日期:2020-12-16 热度:136
Perl中的程序注释:单行注释和多行注释 (一)单行注释: 以#开头的行都被perl认为是注释。但是有一个例外,perl程序的第一行是#开头的,他指定了perl程序的解释器。 例如:#print 1; 这种方法有个缺点,就是每次# 只能够注释一行,如果要注释的代码很长,[详细]
-
Perl钻石操作符输入
所属栏目:[大数据] 日期:2020-12-16 热度:185
1.[root@zsd script]# cat ex1_2.pl2.#!/usr/bin/perl3.while(){4. chomp;5. print "It was $_ that I saw!n";6.}7.[root@zsd script]# cat fred8.hello everyone9.i see10.sky is great player11.[root@zsd script]# ./ex1_2.pl fred12.It was hello every[详细]
-
Perl练习
所属栏目:[大数据] 日期:2020-12-16 热度:93
#!/usr/bin/perl=this is a describe$word="Hello "."World"."n";$newWord=$word x 4;print $newWord; $num=3;$num+=2;print $num,"n";print "the answer is ",6*7,"n";print "num value is $num n";$line=STDIN;if ($line eq "n"){print "your input i[详细]
