What have you tried?

The simplest approach, you could use a for loop, test each element in turn and change it if it matches your criteria.

A generic form for a generic question:

for (@array) {
    if (condition($_)) {
        $_ = transform($_);
    }
}
[download]

$_ = transform($_) for grep condition($_), @array;
[download]

my @array = qw( John Jake and Jasper );
$_ = uc($_) for grep /^a/, @array;
print("@array\n");  # John Jake AND Jasper
[download]

Thanx, I was going to try a while loop, but knew there must be a better way. I appreciate your help.

while or for loop will work fine but u need to use substitute command for substituting the pattern.

my $length = scalar @arr;
for (my $i =0; $i <= $length; $i++){
    $arr[$i] =~ s/<pattern>/<pattern to be changed to>/g;
}
 print "@arr";
[download]