1 files changed, 20 insertions, 8 deletions
diff --git a/debian_edu-summary b/debian_edu-summary
index ad29a72..a873f76 100755
--- a/debian_edu-summary
+++ b/debian_edu-summary
@@ -3,18 +3,30 @@
 use strict;
 
 use SiteSummary;
+my %profiles;
+my %versions;
 
-#for_all_hosts(\&handle_host);
+for_all_hosts(\&handle_host);
+
+print_summary();
+
+exit 0;
 
-handle_host();
 sub handle_host {
     my $hostid = shift;
-    printf("  %-20s %5s\n", "debian-edu-profile", "count");
-    foreach ( get_debian_edu_profile ) {
-    	printf(" %20s\n", $_ || "", "\n");
+    my $profile = get_debian_edu_profile($hostid);
+    my $version = get_debian_edu_ver($hostid);
+    $profiles{$profile}++ if (defined $profile);
+    $profiles{$version}++ if (defined $version);
+}
+
+sub print_summary {
+    printf("  %-30s %5s\n", "debian-edu-profile", "count");
+    foreach ( keys %profiles ) {
+    	printf(" %30s %5s\n", $_ || "", $profiles{$_});
     }
-    printf("  %-20s %5s\n", "debian-edu-version", "count");
-    foreach ( get_debian_edu_ver ) {
-    	printf(" %20s\n", $_ || "", "\n");
+    printf("  %-30s %5s\n", "debian-edu-version", "count");
+    foreach ( keys %versions ) {
+    	printf(" %30s %5s\n", $_ || "", $versions{$_});
     }
 }