Przełącznik niewrażliwy na wielkość liter jako zmienna?

Question

w Perlu, chciałbym móc to zrobić:

$switches = "is"; 
$regexp = "\\d"; 
if ($string =~ m/$regexp/$switches) { 
do something... 
} 

Innymi słowy, w jaki sposób mogę to zrobić „$” opcjonalne przełączniki w czasie wykonywania? (użytkownik może wybierać spośród różnych opcji wyszukiwania)

Answer 1

if ($string =~ /(?$flags:$pattern)/) { 
    ... 
} 

Uwaga: to nie będzie działać, jeśli $pattern jest skompilowany wzorzec (tzn produkowane przez qr//) zamiast ciąg, ponieważ jest to flagi przekazywane do qr//, które mają wpływ na wzór skompilowany z qr//. Będziesz musiał przekazać flagi do qr// zamiast m//.