X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUtil.pm;h=2e7536accabbbfd749f68f20ac20b907df231d3f;hb=b1a1e93daee349cc9a1efdc73dd2e3147a7ca767;hp=e3056e95e05a59cc78c81adaa058428bc34d497b;hpb=b9dffeff7239952814342dad19db3a51def6fab7;p=spider.git diff --git a/perl/DXUtil.pm b/perl/DXUtil.pm index e3056e95..2e7536ac 100644 --- a/perl/DXUtil.pm +++ b/perl/DXUtil.pm @@ -434,3 +434,4 @@ sub deleteitem @$list = grep {$_ ne $item } @$list; return $n - @$list; } +