$header_rec .= "NAME ";
   $header_rec .= "ID ";
   $header_rec .= "REGION ";
   $header_rec .= "UNIT";
   $header_rec .= "STATUS ";

print "[$header_rec]\n";

##</code><code>##

my @columns = ('NAME','ID','REGION','UNIT','STATUS');
print join( "\x09", @columns), "\n";
# or alternatively
print "[@columns]\n";