Doesn't look like you are capturing the part you are trying to print. No capturing parens.
The first regex, also does not match your input.

This would give you what you say you want.

my $one = $1 if /^(\{\w+\s+\d+\})/;
[download]

Wonko