Here is the concatenation:

} elsif (!$desc and /^"?$screen"?\.(.+):/) {
[download]

$screen is concatenated with the rest of the regex. I'd bet it was undef...