diff --git a/lib/Slic3r/Layer.pm b/lib/Slic3r/Layer.pm
index 370964f41..779f75815 100644
--- a/lib/Slic3r/Layer.pm
+++ b/lib/Slic3r/Layer.pm
@@ -276,7 +276,7 @@ sub make_perimeters {
             }
         }
         
-        foreach my $hole (@holes) {
+        foreach my $hole (reverse @holes) {
             push @{ $self->perimeters }, Slic3r::ExtrusionLoop->new(polygon => $hole, role => 'perimeter');
         }