It is not necessary to cd to directories to query their contents. Simply use the relative or absolute pathname to the directories you want to use:

use Net::FTP;
 
$ftp = Net::FTP->new("some.host.name", Debug => 0);
$ftp->login("anonymous",'-anonymous@');
$ftp->dir("/usr/local/ftp/mark");
$ftp->get("/usr/local/ftp/mark/that.file");
$ftp->quit;
[download]

-Mark