my @field = split ('\\|', $string);

##</code><code>##

my @field = split (/\|/, $string);

##</code><code>##

my @field = split (qr/\|/, $string);