Hello.

If I run the following code:

use strict;
use warnings;

use IO::Socket;

my $sock = IO::Socket::INET->new
   (PeerAddr => 'www.google.com',
    PeerPort => 7,
    Proto    => 'tcp') or die "$!";

print $sock "This is a test\n";
close $sock;
__END__

while running ethereal/wireshark, it shows me that the TCP checksums
coming from my requests are always incorrect (the IP checksums are
fine).  I was originally running my script and noticing this error on
a windows 2000 machine, but then I read something about how windows
2000 messes up checksums.  I figured this was an OS problem, not
something wrong with my perl script. I moved my code over to a Fedora
linux machine and ran it from there and got the same problem.

Any ideas?  Can anyone with ethereal or another sniffer replicate the
incorrect checksums?  My perl books tell me that I'm allowed to write
to a socket object like a filehandle, but is this what's causing the
problem?

Thanks for any help you can offer,
Jen

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to