perl 文字列処理関数split

#split関数を使って文字列をスペース文字で区切り、配列に代入する

print "文字列を入力してください＞";
$string = <STDIN>;
chomp($string);

#スペース文字で区切る
@words = split(/\s+/, $string);
foreach(@words){
    #各要素を表示
    print "単語：$_\n";
}

#実行結果
# 文字列を入力してください＞Jhon Paul Ringo Joerge
# 単語：Jhon
# 単語：Paul
# 単語：Ringo
# 単語：Joerge