X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fclient.pl;h=bb3c4829a60ca956175b5439d12e75dd590a9aa2;hb=d215a32b2f4a88630b62ffa060f0c23904874438;hp=66c7b0927337d88443097fb62b2c1daa1cc5dce9;hpb=72e9dcbade3fdb51d9291a2856ca1cc998241f9b;p=spider.git diff --git a/perl/client.pl b/perl/client.pl index 66c7b092..bb3c4829 100755 --- a/perl/client.pl +++ b/perl/client.pl @@ -108,7 +108,7 @@ sub rec_socket my $snl = $mynl; my $newsavenl = ""; $snl = "" if $mode == 0; - $snl = "\r\n" if $mode == 2; + $snl = "\n" if $mode == 2; if ($mode == 2 && $line =~ />$/) { $newsavenl = $snl; $snl = ' ';