&$_() #### my @routines = ( \&Routine, \&Option, ); $_->() for @routines;