my $coords = join ',', @{$coords[$goal]};

##</code><code>##

my $coords = join ',', ${coords[$goal]};