Added these two lines, solved the problem: $qs[$i] =~ s/\;/ /g; $qs[$i] =~ s/\%3B/ /g; -Chilton ===== Want to unsubscribe from this list? ===== Send mail with body "unsubscribe" to macperl-request@macperl.org