Loading tests/keywords.pl +1 −1 Original line number Original line Diff line number Diff line Loading @@ -121,7 +121,7 @@ sub show { } } # sort alphabetically # sort alphabetically my @mtest = reverse sort { $b cmp $a } keys %k; my @mtest = reverse sort { lc($b) cmp lc($a) } keys %k; print <<TOP print <<TOP <table><tr><th>Num</th><th>Keyword</th><th>Test Cases</th></tr> <table><tr><th>Num</th><th>Keyword</th><th>Test Cases</th></tr> Loading Loading
tests/keywords.pl +1 −1 Original line number Original line Diff line number Diff line Loading @@ -121,7 +121,7 @@ sub show { } } # sort alphabetically # sort alphabetically my @mtest = reverse sort { $b cmp $a } keys %k; my @mtest = reverse sort { lc($b) cmp lc($a) } keys %k; print <<TOP print <<TOP <table><tr><th>Num</th><th>Keyword</th><th>Test Cases</th></tr> <table><tr><th>Num</th><th>Keyword</th><th>Test Cases</th></tr> Loading