in reply to Grabbing anything between pipe delimiters

Either you can try:

my @results = $string =~ /(.*?)\|/g or
my @results = $string =~ /([^\|]*)\|/g or
my @results = split /\|/, $string

--------------
It's sad that a family can be torn apart by such a such a simple thing as a pack of wild dogs

In Section Seekers of Perl Wisdom