perl – 如何将__DATA__读入数组,以便每个单词都有自己的索引?
发布时间:2020-12-16 06:09:41 所属栏目:大数据 来源:网络整理
导读:我正在尝试使用以下代码打印字符串white和acer,但它不起作用: @a=DATA;print "$a[9] $a[14]";__DATA__one two three four five six sevenblack yellow white greenapple orange hp acer samsung 如何将__DATA__读入数组,以便白色位于索引9处,而acer位于索引
我正在尝试使用以下代码打印字符串white和acer,但它不起作用:
@a=<DATA>; print "$a[9] $a[14]"; __DATA__ one two three four five six seven black yellow white green apple orange hp acer samsung 如何将__DATA__读入数组,以便白色位于索引9处,而acer位于索引14处? 解决方法
如果你用
Data::Dumper 检查你的“数组”,你会发现它只有四个元素,因此没有定义索引’9’和’14’:
use strict; use warnings; use Data::Dumper; my @a = <DATA>; print Dumper @a; # prints #[ # 'one two three four five six seven #',# 'black yellow white green #',# 'apple orange #',# 'hp acer samsung #' #] __DATA__ one two three four five six seven black yellow white green apple orange hp acer samsung (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |