Hello:
I am new on this site, however I have been programming in perl for over 2 years now.
Last friday when tracking an error on my code I found a very extrange behaviour when using the function "put" from the Net:FTP module. The code is something like this:

   $self->{ftp}->put($origin, $target) or
          $msg = $self->{ftp}->message(),
          $cod = $self->{ftp}->code(),
          print "$cod: $msg\n",
          return 1;

[download]

Looks is ok and works pretty well until the put failed for the first time. Here is the curious behavior, if you debug this piece of code and just before calling the put function you delete the $origin file and calls the put function then it will return an error and execute the "or" part. However the code and message returned in $msg and $cod is: "250: CWD command successful".

So I would like to know if there is any kind of bug reported and fix it or is this as expected. Have anyone had the same problem?

Thank you very much,
Francisco Jaen

20040927 Edit by Corion: Added code tags, formatting

In reply to FTP wierd return. by fjaenale

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.