如何从Perl中以逗号分隔的字符串中提取单词？

要从Perl中以逗号分隔的字符串中提取单词，您可以使用split()函数。split()函数将字符串分割为单词列表。以下是一个示例：

#!/usr/bin/perl

use strict;
use warnings;

my $string = "apple,banana,orange,grape";
my @words = split(',', $string);

foreach my $word (@words) {
    print "$word\n";
}

在这个示例中，我们将一个以逗号分隔的字符串存储在变量$string中。然后，我们使用split()函数将字符串分割为单词列表，并将其存储在变量@words中。最后，我们使用foreach循环遍历单词列表并打印每个单词。