#!/afs/athena/contrib/perl/p

$/ = "";
@users = ();

while (<>) {
    push(@users, $_);
}

print sort(@users);