# Change the output to logfile $filehandle = select LOG_FILENAME; eval $menu[$var]; # Restore the filehandle select $filehandle; #### # Change the output to logfile $filehandle = select LOG_FILENAME; $| = 1; eval $menu[$var]; # Restore the filehandle select $filehandle;