I think you are missing something from your description of the problem but if one is to take you at your word then something like:

my $foo = "'stuff in quotes'";
$foo =~ /'(.*)'/ and $foo = $1;
print $foo;
[download]

should suffice.

/J\