sub max { # Numbers.
	my $max = shift;
	foreach ( @_ ) { $max = $_ if $_ > $max }
	return $max;
}

##</code><code>##

foreach ( keys %{$url{'monday'}} ) { $now = $_ if $_ > $now }