print "START: Interface report on $hostname\n";
print join(" ", map @{$_}, @dat) . "\n";
print "END: Interface report on $hostname\n";