From 5f32d7d5f32c9502b3afb8281aa37d61c80f4aa0 Mon Sep 17 00:00:00 2001 From: Peter Palfrader Date: Thu, 18 Feb 2010 13:50:53 +0100 Subject: [PATCH] re-format output --- dsa-nagios-checks/checks/dsa-check-dnssec-delegation | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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'}, -- 2.20.1