It should probably be mentioned that since the sub now returns a reference, you'll need to call the function with something like:

my $resultsRef = search_database($dbName,@toy);
foreach my $result (@$resultsRef) {
  ...
}
[download]

Since an array reference is returned, you need to use '@$' to dereference the array.

-C

---

print(map(lc(chr),split(6,qw/99672682673683684689632658645641610607/)));