in reply to Re^4: Geo::Shapefile::Writer helpin thread Geo::Shapefile::Writer help
Looking at Geo::Shapefile::Writer try adding brackets around \@pairs like this
$shape->add_shape([\@pairs], {Col1 => "Dumb1"}); [download]