join("\t",@h),"\n"; #### my $j = 1+ $i; #### for my $element (@h) #### my @quotes = getquote(@symbols);
## my $j = 1+ $i; ##
## for my $element (@h) ##
## my @quotes = getquote(@symbols);