perl随笔

2021-12-13 17:34:09 阅读：215 来源： 互联网

1、our 和 my 一样，都是对变量的声明，不过 our 声明的是包全局变量，而 my 声明的是词法变量

my $。。。。。。

2、----open(filevar,filename) filevar 为Perl文件句柄，或者说是程序中用来代表某Perl文件的代号 filename 为Perl文件名
--写模式将原Perl文件覆盖，原有内容丢失，形式为：open(outfile,">outfile")
--添加模式则在原Perl文件的末尾处继续添加内容，形式为：open(appendfile,">>appendfile")

3、WITH no DATA(创建表没有值 with data创建的表有值) PRIMARY INDEX (SUBS_ID)(主键索引)

4、.IF ERRORCODE <> 0 THEN .QUIT 12;(如果返回错误代码是0，退出)

Perl的特殊符号

@ 数组

$x{} x名字前面是美元符号($),后面是花括号({}),则其为 hash 元素
% 要引用整个 hash,使用百分号(“ )作为前缀。前面几页中使用的 hash 的名字为%family_name。
$! 系统产生的一些可读的信息,也可能是出错的信息
$_ 子函数参数变量自己本身
@_ 子程序的私有变量
&x 调用子函数x
<> 数据输入.如果没有指定文件名,则其从标准输入流中自动打开和关闭一系列文件进行读入

Perl默认的内部变量

$- 当前页可打印的行数,属于Perl格式系统的一部分
$! 根据上下文内容返回错误号或者错误串
$” 列表分隔符
$# 打印数字时默认的数字输出格式
$$ Perl解释器的进程ID
$% 当前输出通道的当前页号
$& 与上个格式匹配的字符串
$( 当前进程的组ID
$) 当前进程的有效组ID
$* 设置1表示处理多行格式.现在多以/s和/m修饰符取代之.
$, 当前输出字段分隔符
$. 上次阅读的文件的当前输入行号
$/ 当前输入记录分隔符,默认情况是新行
$: 字符设置,此后的字符串将被分开,以填充连续的字段.
$; 在仿真多维数组时使用的分隔符.
$? 返回上一个外部命令的状态
$@ Perl解释器从eval语句返回的错误消息
$[ 数组中第一个元素的索引号
$\ 当前输出记录的分隔符
$] Perl解释器的子版本号
$^ 当前通道最上面的页面输出格式名字
$^A 打印前用于保存格式化数据的变量
$^D调试标志的值
$^E在非UNIX环境中的操作系统扩展错误信息
$^F最大的文件捆述符数值
$^H由编译器激活的语法检查状态
$^I内置控制编辑器的值
$^L发送到输出通道的走纸换页符
$^M备用内存池的大小
$^O操作系统名
$^P指定当前调试值的内部变量
$^R正则表达式块的上次求值结果
$^S当前解释器状态
$^T从新世纪开始算起,脚步本以秒计算的开始运行的时间
$^W警告开关的当前值
$^X Perl二进制可执行代码的名字
$_ 默认的输入/输出和格式匹配空间
$| 控制对当前选择的输出文件句柄的缓冲
$~ 当前报告格式的名字
$` 在上个格式匹配信息前的字符串
$’ 在上个格式匹配信息后的字符串
$+ 与上个正则表达式搜索格式匹配的最后一个括号
$< 当前执行解释器的用户的真实ID
$<digits>含有与上个匹配正则表达式对应括号结果
$= 当前页面可打印行的数目
$> 当前进程的有效用户ID
包含正在执行的脚本的文件名
$ ARGV 从默认的文件句柄中读取时的当前文件名
%ENV 环境变量列表
%INC 通过do或require包含的文件列表
%SIG 信号列表及其处理方式
@_ 传给子程序的参数列表
@ARGV 传给脚本的命令行参数列表
@INC 在导入模块时需要搜索的目录列表

Perl中模块的安装方法

#perl –MCPAN –e shell
install Bundle::CPAN 更新
reload cpan 重新加载
install Tk 安装pm，用install加上模块名就行了

Perl中不错的文章

关于perl变量作用域（原译） http://bbs.chinaunix.net/thread-612342-1-1.html

在perl语法中

BLOCK是一个用{}包围的代码块。EXPR可以是子函数名、正则表达式等。LIST是输入列表
————————————————
版权声明：本文为CSDN博主「poplarbbs」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。
原文链接：https://blog.csdn.net/poplarbbs/article/details/83495357

5、my $STR_INC_STARTDATE = $ETL::STR_INC_STARTDATE; --如果$ETL是一个模块，STR_INC_STARTDATE就是$STL模块里的一个函数，就跟FILE::PATH一样

6、my $asdd= $ENV{"qwwer"};

--实际上是%ENV，perl中的哈希变量，里面保存的是环境变量。键是环境变量名，值是环境变量值。例如，有一个环境变量是PATH，其值为C:\windows，那么，打印这个环境变量的方法就是：print($ENV{PATH});

7 =<< (大段的字符串赋值)

my $TRG_COL_LIST =<<TRGCOLLIST;

大段内容

TRGCOLLIST;

标签：Perl,perl,当前,列表,格式,随笔,my,ID
来源： https://blog.csdn.net/weixin_42207568/article/details/121907812

本站声明： 1. iCode9 技术分享网（下文简称本站）提供的所有内容，仅供技术学习、探讨和分享；
2. 关于本站的所有留言、评论、转载及引用，纯属内容发起人的个人观点，与本站观点和立场无关；
3. 关于本站的所有言论和文字，纯属内容发起人的个人观点，与本站观点和立场无关；
4. 本站文章均是网友提供，不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属；如您发现该文章侵犯了您的权益，可联系我们第一时间进行删除；
5. 本站为非盈利性的个人网站，所有内容不会用来进行牟利，也不会利用任何形式的广告来间接获益，纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。

ICode9

perl随笔