位置: 编程技术 - 正文

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

  • 个税系统更正申报可以更正几次
  • 个体户定额超了怎么收费
  • 折扣方式销售货物增值税
  • 工会活动奖励现金怎么入账
  • 电脑填制记账凭证实训心得
  • 建筑工程发票来自哪里
  • 百旺税控盘汇总表怎么看
  • 统一企业员工
  • 房地产投资
  • 周转材料摊销借贷方向
  • 结转以前的其他业务成本如何做会计分录呢?
  • 异地存款手续费2022最新规定
  • 空调安装企业能申请工程发票吗?
  • 公司成本票不够交税多少
  • 现金折扣应不应计入成本
  • 在会计中加速折旧的方法
  • 分公司是否需要章程
  • 暂估主营业务成本怎么冲销
  • 企业自持商品住房定义
  • 长期借款和应付利息
  • 投资公司要具备什么
  • 个人出租住房如何开增值税专用发票
  • laravel视频教程
  • 企业应收票据贴现 哪个部门负责
  • js字符串截取
  • 公司给职工买工伤险流程
  • 强大的图片预览软件
  • 详解php归并排序数据
  • 应收账款科目有哪些类别
  • 增值税进项税加计抵减
  • 企业净利润率是多少好
  • 发票章与开票方名称不一致是什么情况
  • c语言中有哪些语句
  • 怎么用java写代码
  • 商铺转让费的会计分录
  • 电影院属于什么经济类型
  • 坏账损失的会计分录小企业会计准则
  • 个人发票需要什么抬头
  • sqlserver无法打开备份设备
  • mysql insert语句操作实例讲解
  • 处置固定资产增值税收入与企业所得税收入不一致
  • 设备安装成本怎么结转
  • 发放职工薪酬的记账凭证
  • 已认证发票退回说明模板
  • 替其他公司支付工资怎么做账
  • 现金收账凭证
  • 事业单位预收账款
  • 水利建设基金缴纳增值税开始缴纳
  • 资本公积其他资本公积用途
  • 小企业的建账流程
  • mysql分区分表原理
  • mysql中的limit用法有哪些(推荐)
  • kvm虚拟机运行方式
  • bootcamp您的磁盘未能分区
  • linux配置java环境变量无法保存并退出
  • 进程lsass.exe
  • ubuntu18.04网络
  • win8系统简介
  • linux恢复rm删除目录
  • mac命令行终端快捷键
  • centos 7安装桌面
  • win8怎么安装win10
  • win10累积更新卡在正在下载
  • android应用程序开发的流程
  • 我为什么要
  • 微信小程序tabbar字体颜色
  • android图片库
  • toggle button什么作用
  • [android] intent实例
  • js闭包作用问题解决应用
  • Unity3D游戏开发引擎
  • js eval
  • js浮动窗口
  • 发票纳税人识别号错了能报销吗
  • 税控盘连接服务器失败是什么原因黑盘发票无法上传
  • 国家税务总局千户集团
  • 医生算是公务员吗?
  • 怎么查询12345的验证码
  • 成品油消费税税率表
  • 经营工作会议
  • 免责声明:网站部分图片文字素材来源于网络,如有侵权,请及时告知,我们会第一时间删除,谢谢! 邮箱:opceo@qq.com

    鄂ICP备2023003026号

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

    友情链接: 武汉网站建设