作者bluemarlboro (这城市 为所欲为)
看板Perl
标题[问题]help~苦恼中! try不出来啊
时间Fri Aug 1 22:20:30 2008
各位前辈好 小弟初学perl没有多久 最近在try一个小程式
不知道是我的观念有错还是怎样 怎麽写都达不到我想要的结果
可以请各位前辈帮忙看问题出在哪吗?谢谢~
照我写的程式 我希望是能秀出来
b
h
n
t
z
可是当程式实际执行时却秀出
b
h
n
t
z
Use of uninitialized value at test2.pl line 9.
为什麽会出现上面的错误讯息呢?
原始码:
#!/usr/bin/perl -w
open(FILE,'v.txt') or die "$!";
@file=<FILE>;
close(FILE);
foreach $line (@file)
{
@e=split(' ',$line);
print "$e[1]\n";
}
v.txt:
a b c d e f
g h i j k l
m n o p q r
s t u v w x
y z 1 2 3 4
1
--
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 118.231.10.106
1F：→ DreamYEN:因为你最後一行的1，在split之後$e[1]是最有东西的 08/01 22:46
2F：→ DreamYEN:所以perl提醒你，里面是空的... 08/01 22:46
3F：→ bluemarlboro:D大 不是很了解你的意思 1之後我并没有留空格或者换 08/01 23:07
4F：→ bluemarlboro:行符号啊 为什麽PERL还会判断有东西呢? 08/01 23:08
5F：→ bluemarlboro:另外想问讯息的意思只是提醒而非错误罗? 谢谢~^^ 08/01 23:08
6F：→ auymle:把标头的-w拿掉就不会出现这警告讯息啦! 08/02 00:03
7F：→ weiyucsie:最後一行的 1 经过split後 应该不会有$e[1]吧？ 08/02 13:16
8F：→ DreamYEN:打错字^^" 最後一行$e[1]是"没"有东西的，所以有警告 08/03 01:07