in reply to Re: Weird Net::POP3 problem
in thread Weird Net::POP3 problem

I get the following output: 
pop3_host="ryoko"

[download]
That seems to be correct; ryoko is the hostname of the pop3 server, and I get the same output if I define the variable statically. Very weird.

Replies are listed 'Best First'.
Re: Re: Re: Weird Net::POP3 problem
by Fastolfe (Vicar) on Apr 13, 2001 at 06:21 UTC
    If both "versions" of "ryoko" consistently yield different results, despite appearing identically, your assumption that they are the same value is invalid. The likely possibility is that there are unprintable characters in the string. If the file was generated under MS-DOS, for instance, you might be seeing a trailing ^Z or something. Newline conventions might also be screwing you up, but if you saw a quotation mark followed by ryoko followed by another quotation mark, that's probably not it.

    I would try splitting the string up and examining each byte, printing its value. That way you can be sure the strings are truly identical. (That, or use 'eq' I guess.)

[reply]
      I tried examining the string with the following line of code, which should split the string into an array of ASCII values: 
      my @blah = map { ord } split(//, $pop3_host);

      [download]
      Unfourtunatley, I recieved identical results for both 'versions' of ryoko, and neither of them seemed to have unpritable chars or newline chars. Is there a different way I should be examining the string?
[reply]
[d/l]
Re: Re: Re: Weird Net::POP3 problem
by dws (Chancellor) on Apr 13, 2001 at 06:03 UTC
    And does one of the two ryoko's yield a hang?

[reply]
      No, as far as I can tell its not even connecting to ryoko. Here is the debug information that Net::POP3 spits out: 
      Net::POP3: Net::POP3(2.21)
Net::POP3:   Net::Cmd(2.18)
Net::POP3:     Exporter
Net::POP3:   IO::Socket::INET
Net::POP3:     IO::Socket(1.1603)
Net::POP3:       IO::Handle(1.1505)

      [download]
      Thats as far as it gets before it hangs and times out. If I define the variable statically, here is what I get: 
      Net::POP3: Net::POP3(2.21)
Net::POP3:   Net::Cmd(2.18)
Net::POP3:     Exporter
Net::POP3:   IO::Socket::INET
Net::POP3:     IO::Socket(1.1603)
Net::POP3:       IO::Handle(1.1505)
Net::POP3=GLOB(0x830aac4)<<< +OK QPOP (version 3.1.2) at ryoko.leet.or
+g starting.

      [download]
      ...and so on and so forth. I'm beginning to think this is some kind of bug in Net::POP3...
[reply]
[d/l]
[select]
        Ooops, I misunderstood your question. The first example yeilds the hang, the second example I gave (where the variable is defined statically) works.
[reply]

In Section Seekers of Perl Wisdom