Since you're not recursing, I'd go for this:

my @files = grep { -f and /pattern/ } glob("/home/*/*/*");
[download]

I'm not too happy with three consecutive asterisks (why I don't know), but it seems to be working.

You may want to benchmark this with the other ideas, though.


[ ar0n ]