In earlier releases of Net::FTP, calling ls() on an empty remote FTP directory
would return undef in both scalar and array contexts.
Thus creating a one-element list
consisting of undef.
my @dir = $ftp->ls; # returned undef when current directory was empty
# @dir = ( undef ) ;
print 'directory empty' unless @dir; # will not print even when dir is empty
