{ 
    my @files;

    find( sub { push @files, $_ }, @my_directories );

    # ... do stuff to @files
};

# @files is invisible here