sub lastlog
	{
	my ($whoami) = @_;
	my $lastlog_data = get_lastlog();
	my $lastlog_text = "";

	for (my $i = 0; $i < @$lastlog_data; $i++)
		{
		my $lastlog = $lastlog_data->[$i];

		last if ($LASTLOG_ONLY_FIRST_DAY && (time - $lastlog->{lastseen}) > 86400);

		$lastlog_text .= ", " if ($i > 0);
		$lastlog_text .= message_link($lastlog->{username});

		if ((time - $lastlog->{lastseen}) > 4)
			{
			$lastlog_text .= " [".(get_age($lastlog->{lastseen}))."]";
			# $lastlog_text .= " $lastlog->{last_hostname}" if ($DEBUG); # ...previously kept track of host
			}
		}

	return "$whoami->{username} [<b>now</b>]" unless (length($lastlog_text));

	return $lastlog_text;
	}

1;