passing arguments: AppleScript to MacPerl

Hi,

Calling a macperl script (dog) from AS, with arguments a, b c, would read:
	tell perl to do script {dog, a, b, c}

Assuming that a, b, c are strings, they are copied to @ARGV in dog.

The problem I have is passing a list of arguments, e.g.
	set names to selection -- nb of selected objects not predictable
	tell perl to do script {dog, names} -- names conversion fails

Then I can converts names to a list of strings:
	set snames to {}
	repeat with nam in names
		set snames to snames & (nam as text)
	end repeat
	tell perl to do script {dog, snames} -- dog is called, @ARGV is empty

dog could be:
	$\ = "\n"; # print with EOL
	print "nb args: ", scalar @ARGV;
	$" = "\n"; # separator
	print "@ARGV";

Could anyone suggest a way around ?

Thanks