Select Code to Download

my $extlist = join('|', @extensions);

my $extlist = join('|', map {quotemeta} @extensions);

my $re = qr/some_text=".*\.(?:$extlist)"/;

my $re = qr/some_text=".*\.(?:$extlist)"$/;