作者izuk (被讨厌了 >0<)
看板Perl
标题[问题] 新手的一个小问题
时间Thu Jul 24 13:39:57 2008
我是从Perl cookbook上抄下来的
想请问
$seen = ();
和
@uniq = ();
这两句的作用和意思是什麽啊 @@
在书上没翻到 =.=
-----------------------
$seen = ();
@uniq = ();
foreach $item (@list) {
unless ($seen{$item})
$seen{$item} = 1;
push(@uniq, $item);
}
}
--
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.113.191.4
1F:推 salagadoola:应该只是把变数初始化而已 07/24 17:08