my ($sep, @a) = @_;
return join($sep, @a);