perl学习笔记(10)

下载地址：

http://search.cpan.org/CPAN/authors/id/R/RO/ROBIN/PadWalker-1.9.tar.gz

解压：

# tar zxvf PadWalker-1.9.tar.gz

进入子目录后编译：

# cd PadWalker-1.9

# perl Makefile.PL

Checking if your kit is complete...

Looks good

Writing Makefile for PadWalker

Writing MYMETA.yml

测试：

# make test

安装：

# make install

练习(打印局部变量名)：

#!/usr/bin/perl -w
use PadWalker qw(var_name);

sub prt {
print var_name(1,\$_[0]) . "=$_[0]\n";
}

my $a1=100;
my $a2=200;
my $a3=300;

prt($a1);
prt($a2);
prt($a3);

# perl f91.pl

$a1=100

$a2=200

$a3=300

全局变量似乎不能这么打印，可能是全局变量和局部变量的分配方式不一样，而PadWalker只开发了局部变量名的访问接口？或者是我没找到？哈，不管怎么说，能把（局部）变量名打印出来，挺有意义的一件事。

今天就到这里。