I am engaging in some "mind reading" here. Maybe you just want a tab between $bar1 and $bar2? A tab character between each individual character of a long string would be a rather strange application - more likely is a tab between "word" tokens. A short example of the desired output would have made things crystal clear.

#!/usr/bin/perl
use strict;
use warnings;

my $bar1 = 'this002haa007hoothat';
my $bar2  = 'abcdef';
my $bar3 = "$bar1\t$bar2";

print "$bar3\n"; #or without $bar3
print "$bar1\t$bar2\n";
__END__
prints:
this002haa007hoothat    abcdef
this002haa007hoothat    abcdef
[download]