my $counter = 0;

foreach (@{$array_ref}) {
    @{$array_ref}[$counter] = CGI::escapeHTML($_);
    $counter++;
}#ende foreach