Trap 5 - danger lurks below 

• Can you write this in one line?

my @users = logged_on_users();
my $count = @users;
print "$count users are logged on\n";