Try something like:

my @new_array;
for ( @array ) {
  if ($_ =~ /CONTENT/) {
    my @list = getlist( $type, $index );
    push @new_array, @list;
  } else {
    push @new_array, $_;
  }
}
@array = @new_array;
[download]

Or, if we want to golf it..

@array = map { ( /CONTENT/ ) ? getlist( $type, $index ) : $_ } @array;
[download]

(This is untested!)

---

Dr. Michael K. Neylon - mneylon-pm@masemware.com || "You've left the lens cap of your mind on again, Pinky" - The Brain