my @result = split( /(\|)/ );