Perl 字符串切割：使用 split 函数根据等号获取第一个元素

"使用 Perl 语言的 split 函数可以根据指定的分隔符将字符串切割成数组。要获取第一个元素，可以使用数组索引 0。\n\n以下代码示例展示了如何使用 split 函数根据等号切割字符串并提取第一个元素：\n\nperl\nmy \$string = \"foo=bar\"\nmy @split_string = split(\"=\", \$string)\nmy \$first_element = \$split_string[0]\nprint \$first_element; # 输出：foo\n\n\n在上面的示例中，split(\"=\", \$string) 将字符串 \$string 按照等号进行切割，并将切割后的结果存储在名为 @split_string 的数组中。然后，使用数组索引 [0] 获取第一个元素，并将其存储在变量 \$first_element 中。最后，使用 print 函数输出结果。\n