sort processes by name

diff --git a/lib/PXElator/httpd.pm b/lib/PXElator/httpd.pm
index 397d859..083370c 100644 (file)
--- a/lib/PXElator/httpd.pm
+++ b/lib/PXElator/httpd.pm
@@ -150,7 +150,7 @@ sub get_request {
                my $debug_proc;
 
                warn 'pids: ', dump( $pids ) if $debug;
-               foreach my $name ( keys %$pids ) {
+               foreach my $name ( sort keys %$pids ) {
                        my $pid = $pids->{$name} || next;
 
                        my $html = qq|<a href=/$name>$pid</a>|;