Select Code to Download

my $string;
$string .= $thing->{employeeID}; 
...
$string .=  "\t" ;
$string .=  $thing->{physicalDeliveryOfficeName} ;
$string .=  "\n";

my $string = join("\t",
    $thing->{employeeID},
...
    $thing->{o},
    $thing->{physicalDeliveryOfficeName},
)."\n";

my $string = join("\t", @$thing{ qw(
    employeeID
...
    o
    physicalDeliveryOfficeName
) })."\n";