print ' ' x 2, "$key", ' ' x (30-length($key)), "$value\n";