位置: 编程技术 - 正文

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脚本)

  • 工资超5000已申报税额为0,可以退税吗
  • 附加税税率分别是多少
  • 车辆购置税会计科目怎么做账
  • 对公转账房租怎么备注
  • 营业执照变更需要什么材料?
  • 已认证红冲需要退回发票吗
  • 出口酒类产品需要什么
  • 所得税季度预缴纳税申报表中弥补以前年度亏损
  • 进口内销是什么意思
  • 购入材料时,会出现哪几种情况
  • 税法规定固定资产折旧残值率
  • 建筑业未开票收入销项税
  • 完税凭证是什么
  • 白酒的消费税怎样计算
  • 同一个行政区
  • 小微企业发放工资做账
  • 企业所得税零申报资产总额怎么填
  • 股东以个人名义签订租赁合同
  • 代理进口业务受托方账务处理流程
  • 职工福利费计提标准是多少
  • microsoft edge怎么设置关闭所有网页
  • 产生的投资收益怎么算
  • 收据大写后面的数字
  • 车辆购置税如何计算器
  • 维尔登的心结
  • 本月购买原材料怎么入账
  • 从银行提取现金准备发放工资
  • 500万元固定资产管理办法
  • 银行存款的利息收入计入什么科目
  • thinkphp操作数据库
  • 存放中央银行款项科目按其资金性质
  • 收到专利补贴的分录
  • 发包工程补付工程款分录
  • 转让子公司产生的投资收益在合并层面是不是全部抵消
  • bootstrap步骤
  • 2022最新廉洁警示语句
  • 外商投资企业 外资企业
  • 进项税额转出和不抵扣的区别
  • 微前端Qiankun
  • 科罗拉多河上的月光简谱
  • vue引入文件路径@的意思
  • 本月增加的无形资产数量
  • php语言之面向对象编程 educoder
  • vue页面嵌套iframe vue页面
  • tf-idf计算
  • 织梦怎么建站
  • mysql千万级数据group by
  • 个体商户个人所得税怎么算
  • sqlserver调度
  • sa密码不满足强密码要求
  • 未达到起征点的增值税会计处理
  • 个体户该怎么交公积金
  • 公司法人往来款账务处理
  • 以前年度损益调整账务处理分录
  • 私车公用涉及的税种有哪些
  • 坏账准备具有什么功能
  • 预付账款没有发票吗
  • 会计估计变动怎么处理
  • 企业多结转的成本跨年怎么冲回?
  • 财务月末暂估成本是什么
  • mysql获取所有表的数据量
  • windows桌面快捷方式怎么创建
  • debian系统
  • 通过防火墙可以保证窃听到的信息毫无价值
  • smss.exe是干嘛的
  • win7双硬盘双系统
  • 32/64位Win10预览版11102(中英日韩等)多国语言包官方iso镜像下载大全
  • redhat 6.5 安装
  • 使用shell脚本实现自动化软件部署
  • python虚拟环境管理
  • node.js在网页制作中的作用
  • 详解各种汽油一吨等于多少升
  • javascript create
  • android设计模式与最佳实践 电子版
  • 电子发票未验真是假发票吗
  • 农业栽培技术
  • 浙江省网上税务局申报
  • 地税局是政府部门吗
  • 个人所得税超过12万能退税吗
  • 为什么消费税是价内税
  • 免责声明:网站部分图片文字素材来源于网络,如有侵权,请及时告知,我们会第一时间删除,谢谢! 邮箱:opceo@qq.com

    鄂ICP备2023003026号

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

    友情链接: 武汉网站建设