join("\t",@h),"\n";

##</code><code>##

my $j = 1+ $i;

##</code><code>##

for my $element (@h)

##</code><code>##

my @quotes = getquote(@symbols);