Re^2: Complicated regexp problem

[johngg]

No need to escape the slashes as you are not using them as delimiters.

my $regexp = qr{(?:ftp://)?/{5}(a-z_)/};