Even easier:

@results = $str =~ m/>([^<]+)</g;
[download]

-- iakobski