There are a few way to do this. It is not clear to me whether you want the line breaks or not. I assume NOT.

for (@array) {
  my $extract = substr($_,rindex($_,')')+1 ); # everything after the l
+ast paren is interesting
  $extract=~ s/\s+//gs; # remove spaces
  print "$extract\n"; # or do something else
}
[download]

Note that there is no check for whether or not there are any )s in the string and skippng over if there are.

Dingus

---

Enter any 47-digit prime number to continue.