print "directive: "; for my $var (@vars) { print munge_var($var), " "; } print "\n";