for my $element (@array) {
    print "$element\n\n";
}

# or using the default variable
for (@array) {
    print "$_\n\n";
}

# or using for as a statement modifier
print "$element\n\n" for @array;