...
use Data::Dumper;
print Dumper \@coords;

##</code><code>##

$VAR1 = [
          '1.0001,2.0002',
          '3.0003,4.0004'
        ];