Not really. There isn't a Perl primitive for it. "Users" is something very system specific. You could of course always use backticks, and use an appropriate command. Typical Unix commands to use: who, w and finger. But note not all systems will have these commands, and not all that have will use the same format of output. On Unix, you could also peek in /tmp/wtmp, /tmp/utmp, /tmp/wtmpx or /tmp/utmpx, depending on what's available. And who knows whether some OS has a /proc/users (>/proc/users to log everyone off... ;-)).

What the situation is on non-Unix systems, I've no idea.

Abigail

P.S. Please fix your sig. You aren't closing your <i> element properly.