X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXLogPrint.pm;h=92deee427026cf1e574b3a66c5d479a88131304f;hb=2fe3813e70786483d2d928f8fa44eb9ff9cb76ca;hp=32f39c26904d2560652ed1870651688834f3a55c;hpb=710e02b70cb2530802812577229cd62a50da8090;p=spider.git diff --git a/perl/DXLogPrint.pm b/perl/DXLogPrint.pm index 32f39c26..92deee42 100644 --- a/perl/DXLogPrint.pm +++ b/perl/DXLogPrint.pm @@ -114,7 +114,7 @@ sub search return "show/$name: ${s}not found"; } - for (sort {$a <=> $b } @in) { + for (sort {$a cmp $b } @in) { push @out, [ split /\^/ ] }