$_ = '1 2 3 2 6=7 2=4 j=384923 34 43 j 3=6';
for my $foo (/(?:\w[^=]*=\w+)/g) {
  print $foo, "\n";
}