See if the following meets your needs:

($match) = $file =~ /([^\"\'\`\;]*(?:[\"\'\`]+.*[\"\'\`]+)?);/;
[download]

rdfield