diff options
author | kcwu <kcwu@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2006-09-01 01:10:03 +0800 |
---|---|---|
committer | kcwu <kcwu@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2006-09-01 01:10:03 +0800 |
commit | f3c0d70cb29c99029b4adc5a1d9f058442e72ffc (patch) | |
tree | e8189a552e889341632b5219a0de32f08b7d3782 | |
parent | 7604ba3978b47aae23ad17ce131a2533741d9da3 (diff) | |
download | pttbbs-f3c0d70cb29c99029b4adc5a1d9f058442e72ffc.tar pttbbs-f3c0d70cb29c99029b4adc5a1d9f058442e72ffc.tar.gz pttbbs-f3c0d70cb29c99029b4adc5a1d9f058442e72ffc.tar.bz2 pttbbs-f3c0d70cb29c99029b4adc5a1d9f058442e72ffc.tar.lz pttbbs-f3c0d70cb29c99029b4adc5a1d9f058442e72ffc.tar.xz pttbbs-f3c0d70cb29c99029b4adc5a1d9f058442e72ffc.tar.zst pttbbs-f3c0d70cb29c99029b4adc5a1d9f058442e72ffc.zip |
bug fix: sort banip list numerically instead of dictionary order
git-svn-id: http://opensvn.csie.org/pttbbs/trunk/pttbbs@3408 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
-rw-r--r-- | util/banip.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/util/banip.pl b/util/banip.pl index 50374d81..da36c619 100644 --- a/util/banip.pl +++ b/util/banip.pl @@ -143,7 +143,7 @@ foreach( @list ){ } print scalar keys %hash, ",\n"; -foreach (sort keys %hash) { +foreach (sort { $a <=> $b } keys %hash) { print "${_}U,\t"; print "\n" if ++$i % 4 == 0; } |