timethis (5000, sub {$tree -> parse_file ($file)});
timethis 5000: 16 wallclock secs (12.98 usr +  1.41 sys = 14.39 CPU) @ 347.46/s (n=5000)