#find the next program and assign to $program_file #Get the sub name which is file name minus .pm eval{ require $program_file; no strict; &$sub_name(\$params); }