- for ( my $i = 0 ; $i < @subscriptions ; $i++ ) {
- my $checkrouting =
- check_routing( $subscriptions[$i]->{'subscriptionid'} );
- $subscriptions[$i]->{'routingedit'} = $checkrouting;
+ for my $subscription ( @subscriptions) {
+ $subscription->{routingedit} = check_routing( $subscription->{subscriptionid} );