From: Peter Palfrader Date: Thu, 18 Feb 2010 12:50:53 +0000 (+0100) Subject: re-format output X-Git-Url: https://wiki.adam-barratt.org.uk/gitweb/?a=commitdiff_plain;h=5f32d7d5f32c9502b3afb8281aa37d61c80f4aa0;p=mirror%2Fdsa-nagios.git re-format output --- diff --git a/dsa-nagios-checks/checks/dsa-check-dnssec-delegation b/dsa-nagios-checks/checks/dsa-check-dnssec-delegation index ff8f920..d61e400 100755 --- a/dsa-nagios-checks/checks/dsa-check-dnssec-delegation +++ b/dsa-nagios-checks/checks/dsa-check-dnssec-delegation @@ -120,9 +120,9 @@ for my $zone (@zones) { } if ($mode eq 'overview') { - my $format = "%30s %-16s %-16s %-16s\n"; + my $format = "%60s %-10s %-10s %-10s\n"; printf $format, "zone", "DNSKEY", "DS in parent", "DLV"; - printf $format, "-"x 30, "-"x 16, "-"x 16, "-"x 16; + printf $format, "-"x 60, "-"x 10, "-"x 10, "-"x 10; for my $zone (sort {$a cmp $b} keys %data) { printf $format, $zone, $data{$zone}->{'dnskey'},