http://www.perlmonks.org?node_id=654796


in reply to Re: Closures clarification
in thread Closures clarification

And what else is he missing?
use File::Find; my $total_size = 0; find({sub $total_size += -s if -f}, '.'); print $total_size, "\n";
You were missing the "use" statement and a "(" in the find function.

Replies are listed 'Best First'.
Re^3: Closures clarification
by memnoch (Scribe) on Dec 04, 2007 at 16:35 UTC
    Thanks fenLisesi....I missed that other typo...I have fixed it in my original posting as well.

    memnoch

    Gloria in Excelsis Deo!