I want to see if I can do it without using a global

sub do_things_with_files {
  my @files_found;
  find( sub {
    if ( ... ) { push @files_found, $File::Find::name; }
  }, '.' );
}
[download]

For further info, you might want to check out the recent tutorial, "Lexical scoping like a fox".

When I search for "file::find" it only gives perldoc, I would like to see all user posts

jdporter
...porque es dificil estar guapo y blanco.

Thanks for the help!!

I need to remember the global vs filescope stuff, as I am really not using a global, but a file scope lexical (my).

I need to pass a function to find because it is pretty long...so I *really* don't want to use "sub {}"

With that in mind, there is no way around this?

BTW, when I use Tk, it allows you to pass

[\&sub, $var1, var2]
[download]

ANYWHERE it takes a function reference, but I am assuming that it is Tk specific...

Guess I'll stick with the 'my' variable if need be ;-)

You can write:

{ # enclosing scope
  my @found_files;

  sub criteria {
    # do the right thing
  }
}

find(\&criteria,$dir);
[download]

Of course, now you have to decide how large a part of your script needs access to the @found_files variable.

-- 
        dakkar - Mobilis in mobile

You know, I could probably help you better if you'd say what it is you're trying to do. If you're just using File::Find to find a list of filenames, and then doing something with those names later, you could write a little wrapper around find like this:

    sub find_files(&@) {
        my( $criteria_cr, @dirs ) = @_;
        my @found;
        find( sub {
            $criteria_cr->( $File::Find::name )
                and push @found, $File::Find::name;
        }, @dirs );
        @found
    }

    # then you could call it like this:

    my @html_files = find_files { /\.html$/ } '.';

    my @abc_subdirs = find_files { -d $_[0] } 'a', 'b', 'c';
[download]

Don't be afraid to use 'my' variables for purposes such as this. It is the very natural, perlish thing to do.

jdporter
...porque es dificil estar guapo y blanco.