Как я могу извлечь значения после = в моей строке с Perl?

Question

У меня есть такая строка

field1=1 field2=2 field3=abc

Я хочу вывести это как

2,1,abc

Есть идеи, как мне это сделать? Я могу написать небольшую C или Java программу для этого, пытаясь найти простой способ сделать это в Perl.

Answer 1

При условии, что ваш заказ был опечаткой:

#!/usr/bin/perl
use strict; use warnings;

my $str='a=1 b=2 c=abc';
my @v;
while ($str =~ /=(\S+)/g) {
    push @v, $1;
}
print join (',', @v);