perl
文章平均质量分 53
Aggressive_snail
great
展开
-
perl手册页命令
部分perl手册 为方便查询perl手册,直接贴到博客省的每次去翻书原创 2016-11-29 13:59:04 · 654 阅读 · 0 评论 -
Perl进程——exec system qx//
在perl中启动子进程执行外部程序有多种方式,主要有exec system qx//,qx//也就是通常说的反引号``。这几种方式有或多或少的区别。本文从是否返回进程 返回值是什么 什么时候返回 是否使用shell几个方面对这三个命令加以解析说明。通过代码详细了解原创 2017-02-28 19:56:17 · 1195 阅读 · 0 评论 -
perl模块(创建模块,加载模块详解)
如何创建和加载perl模块,深入理解perl模块如何创建和加载perl模块深入理解perl模块加载模块1 编译阶段加载模块使用use2 运行阶段加载模块使用require3 使用no创建模块1 命名规则2 创建传统模块3 创建面向对象模块4 模块的导出规则5 版本检查加载模块 模块有两种类型:传统模块和面向对象模块。 传统模块定义子例程和变量,供调用者导入和使用。原创 2017-02-22 18:38:27 · 6542 阅读 · 0 评论 -
DBD::mysql安装出错 ‘can't exec mysql_config’
发现错误 can't exec mysql_config 安装mysql的perl驱动DBD::mysql时出现错误. mysql版本是5.7.17,操作系统ubuntu16.04 定位不到mysql_config程序的位置解决错误在系统中查找mysql_config,找到后加入到环境变量原创 2017-02-14 15:16:52 · 1914 阅读 · 0 评论 -
perl内置函数原型
Perl函数原型Perl原型是什么原型有哪些使用原型Perl函数原型通过原型定义程序员自己的函数,可以像Perl内置函数一样调用自己的函数。原型对参数的个数,参数的类型等做各种约束。使用原型定义函数,函数更安全更好用。下面是本人对函数原型的理解,仅供交流学习。Perl原型是什么按照基本方式定义mypush子例程sub mypush { my @array = @_; ...原创 2017-01-24 09:54:44 · 943 阅读 · 0 评论 -
perl——深入理解(包、命名空间、符号表、类型团、GLOB、变量和函数)
用代码展示(包、命名空间、符号表、类型团、GLOB、变量和函数的关系)原创 2017-02-24 19:20:28 · 4853 阅读 · 0 评论 -
Tkx/tk——瞬态窗口
在Perl中使用Tkx模块调用tk场景:当主窗口需要一个短期的窗口(如对话框、提示框、配置选项框等),而要求短期窗口暂时代表主窗口且能始终在主窗口之上。实现:窗口管理器可以对窗口进行特别的处理。## 配置高级选项use Tkx;## my $mw = Tkx::widget->new("."); ...##sub advancedUI { my $parent =原创 2017-03-09 09:25:11 · 2119 阅读 · 0 评论 -
Perl/Tkx ---- tcl/tk文本组件text
tcl/tk text组件命令解析使用text组件对文件编辑tcltk text组件命令解析text命令创建文本组件文本索引 index文本标记 tag标记选项 -font标记优先级 raise标记绑定 bind搜索与替换 search replace虚拟事件 <<Selection>>撤销和重做 undo redo同级文本组件 peer原创 2017-03-10 15:18:12 · 4193 阅读 · 0 评论 -
perl——当split函数用空格做分隔符时
## 语法split /PATTERN/,EXPR split /PATTERN/ split split用来分隔字符串EXPR,在列表上下文中返回分隔后的列表,在标量上下文中返回列表长度。 split /\s+/ ne split ' '原创 2017-03-22 10:37:52 · 14406 阅读 · 0 评论 -
Tk/Tkx滚动条的使用
所以滚动条的实现是一个双向的过程一个滚动条控制多个组件,同步滚动perl/python/tk滚动条原创 2017-04-07 18:37:31 · 3502 阅读 · 1 评论 -
Perl: “Variable will not stay shared”
variable will not stay shared 分析解决perl sub声明函数原创 2017-04-07 19:23:24 · 997 阅读 · 0 评论 -
数字进制转换
二进制 八进制 十六进制转换为十进制数字其他各个进制数字的相互转换printf "%08b", 011; ## 00001001 八进制->二进制printf "%08b", 11; ## 00001011 十进制->二进制printf "%08b", 0x11; ## 00010001 十六进制->二进制原创 2016-12-06 17:53:47 · 1582 阅读 · 0 评论 -
Perl--AUTOLOA(eval typeglob goto)
使用AUTOLOAD需要理解下面的几点代码展示 正常情况下,不能调用一个尚未定义的子例程. 不过,如果在包中定义有一个名为AUTOLOAD的子例程,那么调用这个AUTOLOAD子例程时会为它提供传入原子例程的同样的参数,也就是perl会把对未定义的子例程的调用全部转到AUTOLOAD上来. 在AUTOLOAD中,可以定义返回值,也可以定义不存在的子例程,然后调用该子例程,就像这个原创 2017-02-27 18:28:02 · 749 阅读 · 0 评论 -
Tkx笔记
tkx笔记,tkx顶级窗口,tkx使用,原创 2017-01-18 17:53:03 · 1302 阅读 · 0 评论 -
获取以及修改cpan镜像地址
坐标北京,cpan install安装模块慢到无法容忍,只能想办法修改cpan镜像地址获取cpan镜像地址打开cpan搜索网站http://search.cpan.org/原创 2016-11-29 17:55:39 · 2636 阅读 · 0 评论 -
perl加载feature的方式
perl不同的版本会有一些新的特性出现,想要使用必须加载.#!/use/bin/perluse strict;use warnings;## #### 用qw加载use feature qw(say);##### 通过指定版本号隐式加载#use v5.10;##### 加载所有该版本的feature#use feature ':5.10';##### 在某个语句原创 2016-11-30 19:02:58 · 748 阅读 · 0 评论 -
perl eval两种使用方式
Perl eval使用方法Perl eval使用方法eval捕获错误eval运行时编译代码eval捕获错误Perl代码在发生编译错误时会将错误信息保存在$!变量。 而我们常用的处理方式是使用die强制终结程序,这样往往会导致程序过早终止。open FILEHANDLE,"<",$filename or die $!; ## die强制退出Perl使用eval操作符作为错误捕获机制。作为捕原创 2016-12-01 18:41:39 · 6484 阅读 · 0 评论 -
perl从sort到施瓦茨变换
这篇博文记录perl的排序算法,从sort的简单排序到简洁漂亮的施瓦茨变换.sort用法1**sort LIST**:## sort 默认情况对文本字符按照字符顺序排序## 对字符串排序my @namelist = qw/bob marry jack simon ann tiger/;print "sort namelist:", sort "@namelist"; ## sortedN原创 2016-12-02 15:58:11 · 1559 阅读 · 0 评论 -
perl两个构建系统,Makefile.PL/Build.PL
perl进阶 第12章 创建你自己的发行版构建系统将我们发布的所有文件合并到实际独立安装的文件中,这些文件在安装时可能需要进行编译,在代码中插入配置信息,或者其他开发者想要实现的一些其他内容,这就叫发行版的构建.Makefile.PLExtUtils::Makemaker ExtUtils::Makemaker模块基于make构建,这个模块构建的发行版使用一个叫Makefile.PL的文件来控原创 2016-12-05 16:18:14 · 3723 阅读 · 0 评论 -
使用Module::Starter创建发行版
创建发行版查看帮助选项$ perldoc Module::Starter创建发行版$ module-starter --mb --module=Animal,Cow,Horse --email=xxx@163.com --author=xxx--mb: 是--builder="Module::Build"的缩写. 通常--module后面的第一个参数(这里是Animal)会是创建的发行版的原创 2016-12-06 15:55:47 · 701 阅读 · 0 评论 -
perl几个特殊的内置函数
__FILE____LINE____PACKAGE____SUB____DATA____END__原创 2016-12-13 16:55:52 · 518 阅读 · 0 评论 -
perl切片(数组和哈希)
切片用法可在数组和哈希中提取值数组中取数组my @array = qw(aa bb cc dd);my @select = @array[1,3];print "@select\n";##输出bb dd哈希中取值my %hash = ( "a" => 1, "b" => 2, "c" => 3, "d" => 4,);my @select = @hash{qw原创 2016-11-25 17:39:27 · 4137 阅读 · 0 评论 -
Tk的三个几何管理器
Tk现在有三个几何管理器Tk现在有三个几何管理器网格管理器 grid网格管理器命令其他高级命令拉伸行为打包器 packpack命令定位器 place命令grid pack place 共同的命令一些有集合管理器作用的组件类网格管理器 grid 将组件按行和列排列管理网格管理器命令-column n -columnspan-in master-ipadx distanc原创 2017-01-09 17:58:03 · 1746 阅读 · 0 评论 -
perl小笔记
perl将普通数值转换为科学计数法数字:用sprintf转化。my $result = sprintf("%.8e", 123456); ## $result => 1.23456000e+005在perl中使用特殊名的变量名形式($@=>$EVAL_ERROR / $&=>$MATCH)use English; ## use Englis原创 2016-11-22 14:56:07 · 1048 阅读 · 0 评论 -
tk/tkx canvas区域放大的代码
canvas放大后,移动canvas使其在屏幕中央通过拖拽鼠标画方框的方式放大### 下面是对x轴方向的代码my $canvasx = xxxxx; ## canvas画布的x方向长度my $canvas_point_x0 = $canvas->canvasx(x0); ## view window的(x0,y0)点处画布上的x坐标my $canvas_point_x1 = $canvas-原创 2017-01-12 18:16:45 · 738 阅读 · 0 评论 -
perl模块 Getopt::Long解析参数
Getopt::Long模块是用于解析命令行参数的perl模块选项解析其他用法使用options调用subroutines多命名选项捆绑选项- 和 GetoptLongConfigure## option variables with default valuemy $verbose = "";my $nda = "";my $more = 0;my $value = "";原创 2016-11-28 16:05:02 · 15122 阅读 · 0 评论