- 论坛徽章:
- 0
|
代码如下:- #!/usr/bin/perl
- #
- use strict;
- use warnings;
- my @prof = qw ( key1 key2 ele1 """ele2" );
- my %profiles;
- my $key = "$prof[0].$prof[1]";
- @{$profiles{$key}} = ($prof[0],$prof[1],$prof[2],$prof[3]);
- #use @
- print "@{$profiles{$key}}[0]\n";
- print "@{$profiles{$key}}[1]\n";
- print "@{$profiles{$key}}[2]\n";
- print "@{$profiles{$key}}[3]\n";
- #use $
- print "${$profiles{$key}}[0]\n";
- print "${$profiles{$key}}[1]\n";
- print "${$profiles{$key}}[2]\n";
- print "${$profiles{$key}}[3]\n";
复制代码 为什么使用@引用数组里的元素没有任何warning信息?
如何是简单的array,如果我使用@数组名[下标]去引用,运行会提示我使用$数组名[下标]。
这2种方式有差别吗?
刚开始看Perl,请见谅,谢谢! |
|