in reply to Re^3: How to call a Sub / Function with changing namein thread How to call a Sub / Function with changing name
$function{$file}->($fh, $dir) ... allergies => \&print_allergies [download]