...
        my $check= grep /\Q$new\E/, $ftp->ls;
...