X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=perl%2Fclient.pl;h=cff140b2eb41dba45ee142f7f08891f3066f2e44;hp=b8129cbb384cd0d7c8d8ea7872460586b9e3f627;hb=cef696652d16bbeec53aca45234ea0b64f3496d3;hpb=d7cd2f1d32971efd542a9e4bf0d1df92a4d054de diff --git a/perl/client.pl b/perl/client.pl index b8129cbb..cff140b2 100755 --- a/perl/client.pl +++ b/perl/client.pl @@ -102,7 +102,7 @@ sub rec_socket my $snl = $mynl; my $newsavenl = ""; $snl = "" if $mode == 0; - if ($mode && $line =~ />$/) { + if ($mode == 2 && $line =~ />$/) { $newsavenl = $snl; $snl = ' '; }