X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUtil.pm;h=2e7536accabbbfd749f68f20ac20b907df231d3f;hb=922dfc80b63e191277fb5ae73cbe2710ecdb6c60;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; } +