作者sweetwords (米虫三号)
看板Perl
标题[请益] 问一段程式，不知道我解读是否正确 ._.
时间Mon Jul 28 15:44:22 2008
我想问的是以下程式码部分黄色跟绿色，我的解读是
黄色部分
当 $rolec 变数符合 $contributorPattern 时候，就把
$rolec 里面的内容丢进去 @insert_rolec 这个阵列内，
不是的话就先用 $rolec_string 先用 : 串起来
到绿色部分
再把 $rolec_string 第一个 : 先去掉，然後後续每一个 : 隔开後，把内容
再丢进去 @insert_rolec 阵列里面。
不知道这样解读是否正确，感请大家指教 ._.?
-----------------------------------------------------程式部分
for(回圈){
if(判断式)
{
if($num_ins==$num_insc)
{
$rolec =~ s/'/\\'/g;
$rolec_string .= ":".$rolec;
}
else
{
if($rolec=~/$ContributorPattern/)
{
$rolec =~ s/'/\\'/g;
push @insert_rolec,$rolec;
}
else
{
$rolec =~ s/'/\\'/g;
$rolec_string .= ":".$rolec;
}
}
}
$rolec_string =~ s/^://g;
push @insert_rolec,split (/:/s,$rolec_string);
}
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.225.159.204
※ 编辑: sweetwords 来自: 61.225.159.204 (07/28 15:51)
1F：推 salagadoola:看来是这样没错。符合的就直接装进@insert_rolec， 07/31 12:43
2F：→ salagadoola:不符合的就先暂存起来等最後再一起装进@insert_rolec 07/31 12:44
3F：→ sweetwords:感谢楼上 :D 07/31 22:55