Hi,
what I can see is:

print 1;     # prints "1"
print if 1;  # prints nothing
[download]

try something like:

print 1 if ( $ftp->cwd( $whole ) );
[download]

Does this help you?

alex pleiner <alex@zeitform.de>
zeitform Internet Dienste