永发信息网

perl 二维数组使用push后数组中始终都是最后插入的数组?

答案:2  悬赏:60  手机版
解决时间 2021-12-01 06:37
perl 二维数组使用push后数组中始终都是最后插入的数组?
最佳答案
push(@array_word,\@Words);#将一维数组插入二维数组
这里不能插入引用,而应该插入拷贝
push(@array_word,[@Words]);
全部回答
file.txt
--------------------------------------
这s里g的d打印e结
果都是一样,都是最后
一次插入的一f维数组。请问是不是我
把插入的语法写g错了,或者g是我在定义二
维数组的a时候
就f错了a?非常g感谢!

push.pl
-------------------------------------
#push.pl

open In,'<',"file.txt";
$i=0;
my @array_word=();

while(){
chomp;
my ($s,$w,@Words)=();
my @W=/([\x80-\xff]+)/g;
$s .= $_ for @W;
for(0..(length($s)/3)){
$w=substr($s,$_*3,3);
push @Words,$w;
}
push @array_word,\@Words;
$i++;
}

print "${$array_word[0]}[0]\n";#打印第一个插入的
print "${$array_word[0]}[1]\n";
print "${$array_word[0]}[2]\n";
print "="x12,"\n";
print "${$array_word[$i-1]}[0]\n";#打印最后一个插入的
print "${$array_word[$i-1]}[1]\n";
print "${$array_word[$i-1]}[2]\n";

===================
perl push.pl




============


我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
水电图纸中3*sc40-fc 2【sywv-25-9-sc32-fc】
2011初中什么时候毕业
这是runningman哪一期
佛山兵兵退热贴有限公司可以代加工四向弹力退
求地道北京人告诉我前门地铁站步行到桥湾地铁
电脑最下面出现version2.11.1210.copyrigh
苹果手机主屏幕右上方中国移动旁边有负92什么
2018年2月27日出生11时出生五行缺么
梦见宰鸡是什么意思
size_t size=1<<width; 这个语句什么意思? w
女人小腿乏是怎么回事
照例子填空 例:凶残得像豺狼一样
38✕52的估算结果是?
谁看过风弄的文,看的心痒痒啊😘求像
清晨敲钟,晚上大打鼓,用一个词怎么说
推荐资讯
南京悠赛生物科技有限公司怎么样?
请问:你用过大金延时训练方法吗 朋友
AMD真的能被三代i3默秒全吗
8个百万,9个万,五个百和六个一
两岁半宝宝心口小是什么意思
搞笑GIF:你要是早这样,我们还会打你吗
在新疆有什么特产地可以承包的
国际投资管理有限公司 这样的诈骗方式您见过
对同音字对子
跟《天也不懂情》同曲不同词的歌叫什么
的周长是314m,那么这条环形路外侧周长是多少
首付3万左右的房子可靠么???
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?