Help for this page

Select Code to Download


  1. or download this
    my $rule = Path::Iterator::Rule->new->file->and(sub { rand() < 0.1 });