--- a/share/html/Ticket/Elements/PreviewScrips
+++ b/share/html/Ticket/Elements/PreviewScrips
@@ -69,7 +69,7 @@
           <b><% $scrip->Description || loc('Scrip #[_1]',$scrip->id) %></b><br />
           <&|/l, loc($scrip->ConditionObj->Name), loc($scrip->ActionObj->Name), loc($scrip->TemplateObj->Name)&>[_1] [_2] with template [_3]</&>
           <br />
-%         for my $type qw(To Cc Bcc) {
+%         for my $type (qw(To Cc Bcc)) {
 %             my @addresses =  $scrip->ActionObj->Action->$type();
 %             next unless @addresses;
               <ul>
@@ -97,7 +97,7 @@
 %         next unless $rule->{hints} && $rule->{hints}{class} eq 'SendEmail';
           <b><% $rule->Describe %></b>
 %         my $data = $rule->{hints}{recipients};
-%         for my $type qw(To Cc Bcc) {
+%         for my $type (qw(To Cc Bcc)) {
 %             next unless @{$data->{$type}};
               <ul>
 %             for my $address (@{$data->{$type}}) {
--- a/share/html/Ticket/Elements/ShowSimplifiedRecipients
+++ b/share/html/Ticket/Elements/ShowSimplifiedRecipients
@@ -58,7 +58,7 @@
 my %headers = (To => {}, Cc => {}, Bcc => {});
 if ($Object->Scrips) {
     for my $scrip (grep $_->ActionObj->Action->isa('RT::Action::SendEmail'), @{$Object->Scrips->Prepared}) {
-        for my $type qw(To Cc Bcc) {
+        for my $type (qw(To Cc Bcc)) {
             $headers{$type}{$_->address} = $_
                 for $scrip->ActionObj->Action->$type();
         }
@@ -66,7 +66,7 @@
 }
 if ($Object->Rules) {
     for my $rule (grep {$_->{hints} and $_->{hints}{class} eq "SendEmail"} @{$Object->Rules}) {
-        for my $type qw(To Cc Bcc) {
+        for my $type (qw(To Cc Bcc)) {
             $headers{$type}{$_} ||= @{[Email::Address->parse($_)]}[0] # Hate list context
                 for @{$rule->{hints}{recipients}{$type}};
         }
@@ -77,7 +77,7 @@
 <&|/Widgets/TitleBox, title => loc('Recipients'), id => 'recipients' &>
 <table>
 <tr>
-% for my $type qw(To Cc Bcc) {
+% for my $type (qw(To Cc Bcc)) {
 %     next unless keys %{$headers{$type}};
 <td valign="top"><% $type %>:</td>
 <td valign="top">