免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 2085 | 回复: 5
打印 上一主题 下一主题

学习PERL过程中有几个问题不太清楚。。。望解答。 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2006-09-21 11:30 |只看该作者 |倒序浏览
%weekday = (
  '01' => 'Mon',
  '02' => 'Tue',
  '03' => 'Wed',
  '04' => 'Thu',
  '05' => 'Fri',
  '06' => 'Sat',
  '07' => 'Sun',
  );
$pointer = \%weekday;
$i = '05';

printf "{$$pointer}{$i} \n";
printf "${$pointer{$i}} \n";

为什么不能输出正确值?

----------------------------------------

@ARGV = (1,2,3,4);
$pointer = \@ARGV;
foreach (@$pointer) {
  printf "$i : $$pointer[$i++]; \n";   
}

为什么要用$$pointer[$i++]才能办理出值??

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
2 [报告]
发表于 2006-09-21 11:33 |只看该作者

论坛徽章:
0
3 [报告]
发表于 2006-09-22 11:05 |只看该作者
建议你用更易读的表达方式:

print "$pointer->{$i} \n";

论坛徽章:
0
4 [报告]
发表于 2006-09-27 14:17 |只看该作者
#!/usr/bin/perl

%weekday = (
  '01' => 'Mon',
  '02' => 'Tue',
  '03' => 'Wed',
  '04' => 'Thu',
  '05' => 'Fri',
  '06' => 'Sat',
  '07' => 'Sun',
  );
$pointer = weekday;
$i = '05';

printf "$$pointer{$i}\n";

论坛徽章:
0
5 [报告]
发表于 2006-09-27 22:58 |只看该作者
原帖由 wangchick 于 2006-9-27 14:17 发表
...
$pointer = weekday;
printf "$$pointer{$i}\n";


Waht a so wild and so freedom perl   I'v never seen. :-(

论坛徽章:
0
6 [报告]
发表于 2006-09-28 16:09 |只看该作者
printf "$i : $$pointer[$i++]; \n";  
$i means what?
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP