位置: 编程技术 - 正文

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

  • 工业土地摊销年限最新规定
  • 税控盘上报
  • 2019年大写二o一九
  • 非居民企业转让财产所得税
  • 无形资产资本化加计扣除可抵扣暂时性差异
  • 消费税的应纳税额的计算
  • 保修期内免费维修
  • 开具红字发票抵扣后如何退税?
  • 国税对个体户征收哪些税?
  • 收到技术服务费计入什么科目
  • 广告业务增值税
  • 存货暂估入账的分录
  • 银行账户设置数大于纳税人向税务机关提供数
  • 汇算清缴是啥
  • 政府补助的会计核算
  • 政府补贴冲减资产原值
  • 工资薪金总额包括哪些内容
  • 商品促销有关问题
  • 出售固定资产账务处理
  • WIN7系统的镜像文件在哪里
  • 在win7中,为什么打开盘符在新窗口中出现?
  • 进入英雄联盟显示超频怎么办
  • 产品入库的业务流程
  • 费用确认条件新准则
  • 简易计税 科目
  • 如何修改自己电脑物理地址
  • macbookpro怎么打开活动监视器
  • 马齿苋的功效与作用的功能与主治与用量
  • 编制合并财务报表时,下列各项中不属于子公司
  • linux操作系统安装包
  • 录入财务凭证
  • 企业所得税汇算表
  • 结转本月完工产品的成本
  • 公司收取保证金违法吗
  • 云原生istio
  • 目标检测yolov5
  • 未完待续百度百科
  • thinkphp d方法
  • php 后端
  • 自制原始凭证代码怎么填
  • 帝国cms模板文件在哪
  • 购买员工团体意外险肺炎能报销吗
  • 企业印花税的申报
  • 员工的交通费发票可以报销嘛
  • 固定资产融资租赁是什么意思
  • 坏账准备的计提金额怎么算
  • 不良品扣款入什么科目
  • 小规模纳税人是小微企业吗
  • mysql error!
  • 专项附加扣除批量上传怎么上传
  • mysql查询时间段的交集数据
  • 会计从业资格证取消了吗
  • 固定资产盘盈影响所有者权益吗
  • 税控系统技术维护费全额抵扣分录
  • 职工食堂的费用,会计上怎么做账?
  • 融资租赁首付款的性质
  • 异地出租房屋
  • 生产型企业入库管理办法
  • sqlserver导出数据库及表结构
  • 数据库聚簇索引和非聚簇索引
  • mac mysql密码忘记了怎么办
  • 电脑进程里的system
  • windows10日历没有显示农历
  • 如何关闭win10自带杀毒软件
  • linux中tailf命令
  • regsvc32.exe - regsvc32是什么进程 有什么用
  • win8应用商店下载
  • cocos2d rpg
  • ip地址一键切换
  • json web key
  • 如何进行前后端交互
  • shell中使用变量
  • android接听电话
  • js数组entries
  • jquery实现图片横向移动
  • Python selenium 父子、兄弟、相邻节点定位方式详解
  • 广东省深圳市税占27%,高新技术占15%,各市分别占多少?
  • 环保税征税范围噪音
  • 携程机票票号怎么查询
  • ca认证登录不了
  • 免责声明:网站部分图片文字素材来源于网络,如有侵权,请及时告知,我们会第一时间删除,谢谢! 邮箱:opceo@qq.com

    鄂ICP备2023003026号

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

    友情链接: 武汉网站建设