my @strings; foreach $keyword (@keywords){ $wordnum++; push @strings, "keyword_$wordnum=$keyword"; } my $string = join '&', @strings;