位置: 编程技术 - 正文

perl引用的相关知识分享(perl中qw)

编辑:rootadmin

为何使用引用?

在perl4中,hash表中的value字段只能是scalar,而不能是list,这对于有些情况是很不方便的,比如有下面的数据:Chicago, USAFrankfurt, GermanyBerlin, GermanyWashington, USAHelsinki, FinlandNew York, USA

我们想要按国家将城市分类,每个国家后面对应城市列表,如果用perl4来做,必须将城市列表组合成字符串才行,如果用perl5就可以用引用来做,有了引用,就可以构造复杂的hash结构,就可以用列表作为hash的值了。

如何定义引用

方法一 使用斜线

定义变量的时候,在变量名前面加个,就得到了这个变量的一个引用,比如

方法二 匿名引用

方法一不是很常用,最常用的还是匿名引用,方法如下匿名数组引用-用[]定义$aref= [ 1,"foo",undef, ];

匿名数组的元素仍然可以是匿名数组,所以我们可以用这种方法构造数组的数组,可以构造任意维度的数组。my $aref = [ [1, 2, 3], [4, 5, 6], [7, 8, 9],]

匿名哈希引用-用{}定义

$href= { APR =>4, AUG =>8 };

使用引用

定义了引用之后,可以使用不同的方法来访问引用,这里主要有三种方法。记忆这三种方法有个诀窍,将他们与普通的变量访问作比较即可。

方法一

与普通变量的访问方法相比,假设原来的变量名是name,则此方法在所有name出现的地方用$name代替,如下:

# 方法一#方法二#同理,哈希引用的使用方法如下。

注意:当{}内部是$var的形式时,{}是可以省略的,也就是说@{$aref}等价于@$aref,不过初学最好养成使用{}的习惯。

方法三前两种方法比较繁琐,这种很简洁,就是使用箭头符号->

解引用总结我们知道[1, 2, 3]定义了一个(1, 2, 3)的匿名引用,所以数组a实际上包含三个元素,每个元素是一个引用,该引用指向一个数组,所以我们可以用下面的方法来访问数组元素(注意,下标从0开始)

$a[1][2]表示第二行第三列元素6,也可以写成$a[1]->[2],不过很少有人这么写。还可以写成${$a[1]}[2],几乎没人这么写!

多维数组的另一个写法如下:

这两者的区别有以下几点:1)、前者是真正的数组,所以定义变量是使用@,后者是指向匿名数组的引用,所以定义的时候使用$2)、前者的数组元素是匿名数组,而外层数组则是实体数组,后者无论元素还是外层数组都是匿名数组3)、前者可以用$a[x][y]的形式访问,而后者只能用解引用的方式访问,即$a->[x][y]的形式。

数组的哈希,哈希的数组,哈希的哈希

也就是哈希表中的每个元素也是一个哈希表,比如一个学生集合组成的哈希,其key是学生名字(唯一),其值是每个学生的属性,比如年龄,身高及学号等。

引用的赋值

$aref2 = $aref1; 将使得$aref2和$aref1指向同一个数组,如果想将$aref1指向的数组拷贝一份给$aref2的话,使用下面的方法,[]里面对数组进行解引用,而[]以解引用后的数组为内容生成了一个新的匿名数组,又赋值给$aref2。$aref2 = [@{$aref1}];

注意:不能使用下面的形式,外层的[]是不可缺少的。由于=左边是标量,所以右边的数组会被解释为标量环境,得到的是数组元素个数,而不是元素本身。但是如果加上[]就可以了,这样perl知道这是一个匿名数组的赋值。$aref2 = @{$aref1};

判断一个变量是否是引用

使用ref函数即可,如果变量是引用则返回真,否则返回假。实际上它更智能,它会返回引用对应的类型,比如HASH或者ARRAY。

判断两个引用是否指向同一个目标

可以用eq,这将以字符串的形式判断,也可以使用==

产生如下输出:ARRAY(0xbec)ARRAY(0xbec)reference equal (eq)reference equal (==)

推荐整理分享perl引用的相关知识分享(perl中qw),希望有所帮助,仅作参考,欢迎阅读内容。

perl引用的相关知识分享(perl中qw)

文章相关热门搜索词:perl语句,perl中qw,perl调用函数,perl调用函数,perl index用法,perl中index,perl引用与解引用,perl 引用,内容如对您有帮助,希望把文章链接给更多的朋友!

perl 调试命令的相关知识小结 缺省的Perl调试器就是perl解释器本身,另外还有图形界面的调试器。由于在开发程序时一般都使用telnet访问服务器,因此本文主要为大家介绍下缺省的命

perl use 命令中指定路径的方法 注意:uselib后面只能跟directory,不能跟file。uselib'c:perllibxml';useparser注解:parse.pm是目录c:perllibxml下的一个模块。

perl的cgi高级编程介绍 一CGI.pm中的方法(routines)调用1.CGI.pm实现了两种使用方法,分别是面向对象的方式和传统的perlmodule方法的方式。面向对象的方式:#!/usr/local/bin/perl-wuseC

标签: perl中qw

本文链接地址:https://www.jiuchutong.com/biancheng/372500.html 转载请保留说明!

上一篇:perl的INC设置分析(perl-v)

下一篇:perl 调试命令的相关知识小结(调用perl脚本)

  • 待办事项没有印章怎么办
  • 非金银首饰以旧换新增值税
  • 税局退回附加税账务处理办法
  • 劳务费计入职工薪酬吗
  • 个税手续费发给个人怎么做账
  • 简易计税费
  • 其他业务利润包括哪些科目
  • 怎样查验电子发票真伪
  • 专用发票丢失怎么抵扣
  • 公司付款给个人一定要取得发票吗
  • 投资收益账户月末结转余额吗?
  • 公司出售自用汽车如何开票
  • 固定资产之前没提折旧,数额交大
  • 不交社保的单位违法吗?
  • 道路运输业税率多少
  • 增值税的税负率的计算公式
  • 未到期汇票要怎么进行税务处理?
  • 售楼部购买空调计入哪个科目
  • 没有车船税证明可以年检吗
  • 单独出售的包装物是否属于包装物的核算范围
  • 维修材料费主要包括
  • 个人挂靠公司按揭购车账务怎么处理?
  • 企业为员工购买社保缴费标准
  • 公司工会需要单独做账么
  • 个税退手续费怎么申请
  • 广告公司的成本是什么
  • cmos bjt
  • php与jquery
  • php 守护进程
  • 0x00000024蓝屏怎样解决
  • 拍卖获得收入个税
  • 笔记本保养技巧和方法
  • 所得税时间性差异与暂时性差异
  • 前端布局flex
  • 手续费及佣金收入会计分录
  • winform开发技术有哪些
  • 微服务springboot结构
  • linuxless命令查看文件
  • 酒店的销售费用和管理费用如何进行区分
  • 长期股权投资成本怎么计算
  • 端午节要给钱吗
  • 公司基本户可以异地开户吗
  • python怎么用
  • 不能税前扣除的业务招待费怎么处理
  • 劳务公司包工包料工程如何账务处理
  • 电子发票如何申领取电子发票
  • 房地产企业印花税计入什么科目
  • 小企业会计准则适用于哪些企业
  • 需要登记的权利
  • 房屋维修基金是谁交
  • 营业外收支计算公式
  • 上个月多计提的费用怎么调整
  • 库存商品坏账准备怎么算
  • 结转是什么意思啊
  • 如何冲其他应付款发票
  • 电子承兑追索清偿的顺序
  • 预期信用损失率变更属于会计估计变更吗
  • 给职工发放的米面油记入什么
  • 广告宣传费纳税调整额怎么算
  • 其它流动资产为负数原因
  • 劳务费需要通过应付职工薪酬科目核算吗
  • windowsxp教程
  • 使用u盘安装macos
  • win7虚拟xp系统怎么安装
  • mac上怎么用ppt
  • 如何关闭office开机自启动
  • 惠普笔记本重装系统后没有无线连接
  • pmropn.exe
  • win10控制面板如何卸载软件
  • win10预览版21277
  • 关于如何用好调查研究推动警务发展
  • javascript概述及作用
  • android实战教程
  • css制作热点新闻板块
  • javascript总结
  • 期初未缴税额是什么意思
  • 高速公路通行费的税率
  • 公司权责清单范围
  • 青海的医疗保险费是多少钱
  • 伤残补助金要解除合同吗
  • 免责声明:网站部分图片文字素材来源于网络,如有侵权,请及时告知,我们会第一时间删除,谢谢! 邮箱:opceo@qq.com

    鄂ICP备2023003026号

    网站地图: 企业信息 工商信息 财税知识 网络常识 编程技术

    友情链接: 武汉网站建设