in reply to RegEx, $1, problem

You want:
next unless $string =~ /<b>([\w\.]+\.zip)<\/b>/;
Boris