Re^2: Net::FTP pwd bug?

Hi,

If you are following the above code try something like :

#!/usr/bin/perl 
use Net::FTP;
my $destserv="ftp.myhost.com";
my $destuser="username";
my $destpass="password";

$ftp = Net::FTP->new($destserv) or die "error connecting\n";
$ftp->login($destuser,$destpass);
my $mypath = $ftp->pwd();
$ftp->quit();
print "FTP Path: $mypath";
[download]

Keep in mind that this is untested, its late and I am seriously sleep deprived.
Have you checked out the documentation? There is a link to examples you can also have a look at.

Hope this helps

Martin

Comment on Re^2: Net::FTP pwd bug? Download Code

Replies are listed 'Best First'.
Re^3: Net::FTP pwd bug? by mikeock (Hermit) on Oct 12, 2005 at 22:59 UTC
When that variable is added `my $mypath = $ftp->pwd():` to my code, I get the same results as just trying to call `$ftp->pwd();` And by the same I mean that there is no repsonse at all. The Box that has the server on it allows me to login and type pwd so I know that it is supported on the server.	[reply] [d/l] [select]
Re^4: Net::FTP pwd bug? by runrig (Abbot) on Oct 12, 2005 at 23:08 UTC
Have you tried trapping for errors similar to the code in grantm's post above?: `my $path = $ftp->pwd() or die "pwd failed: " . $ftp->code() . ": " . $ftp->message(); print "$path\n";` [download]	[reply] [d/l]
Re^5: Net::FTP pwd bug? by mikeock (Hermit) on Oct 12, 2005 at 23:17 UTC
Hmmm.... Copied `my $path = $ftp->pwd() or die "pwd failed: " . $ftp->code() . ": " . $ftp->message(); print "$path\n";` [download] Directly and it seems to work... (I get the path!) What was I doing wrong? Edit Da der I forgot to print the path! I got it now	[reply] [d/l]