man Cz::Sort () - Czech sort


Cz::Sort - Czech sort


        use Cz::Sort;
        my $result = czcmp("_x j&á", "_&p");
        my @sorted = czsort qw(plachta plaòka Plánièka plánièka plánì);
        print "@sorted\n";


Implements czech sorting conventions, indepentent on current locales in effect, which are often bad. Does the four-pass sort. The idea and the base of the conversion table comes from Petr Olsak's program csr and the code is as compliant with CSN 97 6030 as possible.

The basic function provided by this module, is czcmp. If compares two scalars and returns the (-1, 0, 1) result. The function can be called directly, like

        my $result = czcmp("_x j&á", "_&p");

But for convenience and also because of compatibility with older versions, there is a function czsort. It works on list of strings and returns that list, hmm, sorted. The function is defined simply like

        sub czsort
                { sort { czcmp($a, $b); } @_; }

standard use of user's function in sort. Hashes would be simply sorted

        @sorted = sort { czcmp($hash{$a}, $hash{$b}) }
                                                keys %hash;

Both czcmp and czsort are exported into caller's namespace by default, as well as cscmp and cssort that are just aliases.

This module comes with encoding table prepared for ISO-8859-2 (Latin-2) encoding. If your data come in different one, you might want to check the module Cstocs which can be used for reencoding of the list's data prior to calling czsort, or reencode this module to fit your needs.





(c) 1997--2000 Jan Pazdziora <>,

at Faculty of Informatics, Masaryk University, Brno