#!/usr/bin/perl
my $a='|значение1|значение2\\\\|значение\\ 2.1\|значение 3';

print "$_\n" for($a =~ /(?:[^|\\]+|\\.)+/g);