crespo09 发表于 2018-8-31 12:03:58

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,\$_) . "=$_\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只开发了局部变量名的访问接口?或者是我没找到?哈,不管怎么说,能把(局部)变量名打印出来,挺有意义的一件事。
  今天就到这里。


页: [1]
查看完整版本: perl学习笔记(10)