弐ch編集のPerl講座

[0228 nobodyさん 2015/11/14(土) 22:14:37.04 ID:GSfB4ANO]

use strict;
use warnings;

my $test = 'aaa444111aAAA';
while ($test =~ /[a-z]/g){
print $&,"\n";

}
とした時、
a
a
a
a
と縦に表示されるんじゃなくて
aaaaと横に表示したいのですが、どうしたらよいのでしょうか？