I need to return all data inside each set of <> in a string ...
I've included 2 examples, but they both return the last item only...
TIA, mike
-----------------------------
$aa = "Mike <mike\@mike.com>, Mark <mark\@mark.com>";
print "$aa\n";
-- ie. 1
$aa =~ s/^.*\<(.*)\>.*$/\1/g;
print "$aa\n";
--ie. 2
for ( $aa =~ s/^.*\<(.*)\>.*$/\1/g ) {
print "$aa\n";
}