in reply to Fastest way to turn coordinate list into array

Untested, but does this do what you want?

my @poly = map { [ (split /,/, $_)[0, 1] ] } split / /, $coords;

In Section Seekers of Perl Wisdom