Help for this page
my @order = ('~', '&', '@', '%', '+', ''); my %order = map { $order[$_] => $_ } 0..$#order; ... print "$_\n" for sort nick_cmp @users;
~shurmann &BECHED ... lizergin sp w