1 files changed, 0 insertions, 29 deletions
diff --git a/examples/printer-accounting/acct-sum b/examples/printer-accounting/acct-sum
deleted file mode 100644
index ffbfc8d8801..00000000000
--- a/examples/printer-accounting/acct-sum
+++ /dev/null
@@ -1,29 +0,0 @@
-#!/usr/bin/perl
-
-while (<>) {
-        ($date, $user, $machine, $size, $pages) = split(' ');
-
-        $Printer{$ARGV}++;
-        $PrinterPages{$ARGV} += $pages;
-
-        $Jobs{$user}++;
-        $Size{$user}+= $size;
-        $Pages{$user}+= $pages;
-}
-
-printf "%-15s %5s %8s %8s\n", qw(User Jobs Pages Size);
-foreach $user (sort keys %Jobs) {
-        printf "%-15s %5d %8d %8d \KB\n",
-                $user, $Jobs{$user},  $Pages{$user}, $Size{$user}/1024;
-}
-
-
-print "\n\n";
-printf "%-15s %5s %8s %8s\n", qw(Printer Jobs Pages);
-foreach $prn (sort keys %Printer) {
-        ($name = $prn) =~ s=.*/==;
-        printf "%-15s %5d %8d\n",
-                $name, $Printer{$prn}, $PrinterPages{$prn};
-}
-
-