Perl学习笔记指针与多维数组用法指导

本文和大家重点讨论一下Perl指针与多维数组的概念，在Perl中，可以把Perl引用称为指针，二者是通用的，无差别的。Perl引用在创建复杂数据方面十分有用。

专注于为中小企业提供做网站、成都网站建设服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业石景山免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了上千企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。

Perl学习笔记指针与多维数组

一、Perl引用简介

Perl引用就是指针，可以指向变量、数组、哈希表（也叫关联数组）甚至子程序。Pascal或C程序员应该对Perl引用（即指针）的概念很熟悉，Perl引用就是某值的地址，对其的使用则取决于程序员和语言的规定。在Perl中，可以把Perl引用称为指针，二者是通用的，无差别的。Perl引用在创建复杂数据方面十分有用。
Perl5中的两种Perl引用类型为硬引用和符号引用。符号引用含有变量的名字，它对运行时创建变量名并定位很有用，基本上，符号Perl引用就象文件名或UNIX系统中的软链接。而硬Perl引用则象文件系统中的硬链接。

Perl4只允许符号Perl引用，给使用造成一些困难。例如，只允许通过名字对包的符号名哈希表（名为_main{}）建立索引。Perl5则允许数据的硬Perl引用，方便多了。
硬Perl引用跟踪Perl引用的计数，当其数为零时，Perl自动将被Perl引用的项目释放，如果该项目是对象，则析构释放到内存池中。Perl本身就是个面向对象的语言，因为Perl中的任何东西都是对象，包和模块使得对象更易于使用。
简单变量的硬Perl引用很简单，对于非简单变量的Perl引用，你必须显式地解除Perl引用并告诉其应如何做，详见《第章Perl中的面向对象编程》。

二、使用Perl引用

本章中，简单变量指像$pointer这样的变量，$pointer仅含一个数据项，其可以为数字、字符串或地址。
任何简单变量均可保存硬Perl引用。因为数组和哈希表含有多个简单变量，所以可以建立多种组合而成的复杂的数据结构，如数组的数组、哈希表的数组、子程序的哈希表等等。只要你理解其实只是在用简单变量在工作，就应该可以正确的在最复杂的结构中正确地解除Perl引用。

首先来看一些基本要点。

如果$pointer的值为一个数组的指针，则通过形式@$pointer来访问数组中的元素。形式@$pointer的意义为“取出$pointer中的地址值当作数组使用”。类似的，%$pointer为指向哈希表中***个元素的Perl引用。
有多种构建Perl引用的方法，几乎可以对任何数据建立Perl引用，如数组、简单变量、子程序、文件句柄，以及--C程序员会感兴趣的--Perl引用。Perl使你有能力写出把自己都搞糊涂的极其复杂的代码。:)
下面看看Perl中创建和使用Perl引用的方法。

三、使用反斜线(\)操作符

反斜线操作符与C语言中传递地址的操作符&功能类似。一般是用\创建变量又一个新的Perl引用。下面为创建简单变量的Perl引用的例子：

 
 
 
  
  
  $variavle=22;  
  
  
  $pointer=\$variable;  
  
  
  $ice="jello";  
  
  
  $iceprt=\$ice;

Perl引用$pointer指向存有$variable值的位置，Perl引用$iceptr指向"jello"。即使最初的Perl引用$variable销毁了，仍然可以通过$pointer访问该值，这是一个硬Perl引用，所以必须同时销毁$pointer和$variable以便该空间释放到内存池中。
在上面的例子中，Perl引用变量$pointer存的是$variable的地址，而不是值本身，要获得值，形式为两个$符号，如下：

 
 
 
  
  
  #!/usr/bin/Perl  
  
  
  $value=10;  
  
  
  $pointer=\$value;  
  
  
  printf"\nPointerAddress$pointerof$value\n";  
  
  
  printf"\nWhatPointer*($pointer)pointsto$$pointer\n";

结果输出如下：

PointerAddressSCALAR(0x806c520)of10
WhatPointer*(SCALAR(0x806c520))pointsto10
每次运行，输出结果中的地址会有所改变，但可以看到$pointer给出地址，而$$pointer给出$variable的值。
看一下地址的显示，SCALAR后面一串十六进制，SCALAR说明该地址指向简单变量（即标量），后面的数字是实际存贮值的地址。
注意：指针就是地址，通过指针可以访问该地址处存贮的数据。如果指针指向了无效的地址，就会得到不正确的数据。通常情况下，Perl会返回NULL值，但不该依赖于此，一定要在程序中把所有的指针正确地初始化，指向有效的数据项。

四、多维数组

语句@array=list;可以创建数组的引用，中括号可以创建匿名数组的引用。下面语句为用于画图的三维数组的例子：
$line=['solid','black',['1','2','3'],['4','5','6']];
此语句建立了一个含四个元素的三维数组，变量$line指向该数组。前两个元素是标量，存贮线条的类型和颜色，后两个元素是匿名数组的引用，存贮线条的起点和终点。访问其元素语法如下：

$arrayReference->[$index]single-dimensionalarray
$arrayReference->[$index1][$index2]two-dimensionalarray
$arrayReference->[$index1][$index2][$index3]three-dimensionalarray
可以创建在你的智力、设计经验和计算机的内存允许的情况下极尽复杂的结构，但***对可能读到或管理你的代码的人友好一些--尽量使代码简单些。另一方面，如果你想向别人炫耀你的编程能力，Perl给你足够的机会和能力编写连自己都难免糊涂的代码。:)
建议：当你想使用多于三维的数组时，***考虑使用其它数据结构来简化代码。
下面为创建和使用二维数组的例子：

 
 
 
  
  
  1#!/usr/bin/perl  
  
  
  2#  
  
  
  3#UsingMulti-dimensionalArrayreferences  
  
  
  4#  
  
  
  5$line=['solid','black',['1','2','3'],['4','5','6']];  
  
  
  6print"\$line->[0]=$line->[0]\n";  
  
  
  7print"\$line->[1]=$line->[1]\n";  
  
  
  8print"\$line->[2][0]=$line->[2][0]\n";  
  
  
  9print"\$line->[2][1]=$line->[2][1]\n";  
  
  
  10print"\$line->[2][2]=$line->[2][2]\n";  
  
  
  11print"\$line->[3][0]=$line->[3][0]\n";  
  
  
  12print"\$line->[3][1]=$line->[3][1]\n";  
  
  
  13print"\$line->[3][2]=$line->[3][2]\n";  
  
  
  14print"\n";#Theobligatoryoutputbeautifier.

结果输出如下：

 
 
 
  
  
  $line->[0]=solid  
  
  
  $line->[1]=black  
  
  
  $line->[2][0]=1  
  
  
  $line->[2][1]=2  
  
  
  $line->[2][2]=3  
  
  
  $line->[3][0]=4  
  
  
  $line->[3][1]=5  
  
  
  $line->[3][2]=6

网页题目：Perl学习笔记指针与多维数组用法指导
文章网址：http://www.shufengxianlan.com/qtweb/news49/301749.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源：创新互联

猜你还喜欢下面的内容