文字列を読み込む方法

質問

最近Perlをはじめました。
文字列を読み込んでいき、３文字づつにまとめる方法はありますか？

例）
abcdefg→abc efg と分けて配列に読み込む。

回答No.1

okiyoshi · ベストアンサー

# 対象となる文字列
my $str = 'abcdefg';

# 正規表現を使い、
# １文字から３文字までにマッチさせながら配列に格納
my @array = $str =~ /(\w{1,3})/g;

# 元の文字列と取込んだ配列を確認
print "$str\n";
print "$_\n" foreach( @array );

お礼

ありがとうございます。
おかげで問題が解決しました。