Perl ある特定の文字にある数値を１つの配列にまとめる方法 教えてください！ my $test =

Perl ある特定の文字にある数値を１つの配列にまとめる方法 教えてください！ my $test = "テスト　>>3
あああ >>2 aaaa
>>4
wwwewewe"; >>の後ろにある数値を１つの配列 @Pにしたいのですが、どうすればできますでしょうか？ $test =~ s/(>>|＞＞|>>)(\d*)//g; print "$2"; これだと4しか取得できず困っております。 結果的に @P = ("3","2","4"); というふうにしたいのです。

No.1 回答者： ふぁーらうぇい 回答日時： 2018/11/22 21:37

s/// は置換用の構文なので

m// を使うのがいいでしょう。m// の左辺で() 内を取得できます。(s///だと置換した回数が取れてしまう。)

my $test = "テスト　>>3
あああ >>2 aaaa
>>4
wwwewewe";

my @P = ($test =~ /(>>|＞＞|>>)(\d*)/g); print "@P";

No.2 回答者： Tacosan 回答日時： 2018/11/23 01:08

(?:>>|＞＞|>>) の方がいいような気がする＞#1.