Dlaczego podział na `|` (pipe) nie działa zgodnie z oczekiwaniami?

Question

Mam ciąg, który chcę podzielić. Ale separator jest określany w czasie wykonywania, więc muszę go przekazać jako zmienną.

Coś takiego jak my @fields = split(/$delimiter/,$string); nie działa. jakieś pomysły?

---

Wejście:

abcd|efgh|23 

oczekiwany wynik:

abcd 
efgh 
23 

Answer 1

Musisz uciec swój ogranicznik, ponieważ jest to znak specjalny w wyrażeniach regularnych.

Wariant 1:

$delimiter = quotemeta($delimiter); 
my @fields = split /$delimiter/, $string; 

Opcja 2:

my @fields = split /\Q$delimiter/, $string;