1 2=3 4=5
1 2=3 and 4=5

##</code><code>##

% perl -e '$str = "1 2=3 4=5"; print "$str\n"; $str =~ s/(\w+[\w\s]*=\w+)(?:\s)*/$1\|/g; print "$str\n"; print "Should look like: 1 2=3|4=5|\n"'

1 2=3 4=5
1 2=3|4=5|
Should look like: 1 2=3|4=5|

##</code><code>##

perl -e '$str = "1 2=3 4=5"; print "$str\n"; $str =~ m/(\w+[\w\s]*=\w+)(?:\s)*/g; print "$_\n" foreach @$0;'
1 2=3 4=5

1 2=3
4=5

##</code><code>##

1 2 3 2 6=7
2=4
j=384923
34 43 j 3=6

##</code><code>##

perl -e '$str = "1 2 3 2 6=7  2=4 j=384923 34 43 j 3=6"; print "$_\n" foreach ($str =~ m/(\w+[\w\s]*=\w+)/g);'

1 2 3 2 6=7
2=4
j=384923
34 43 j 3=6