sub time_as_date($) # ... sub print_info($)