% for my $string (@$list) {
  • ----<%= $string %>----
    • % }