foreach my $section ( @_ ) {
        ...