mysql - Perl：如何拆分和剪切给定的字符串？

Question

我有一个看起来像这样的字符串：

$string = "标签：甜的、美味的、巧克力的、深色的"

我想在 Mysql 表中插入这些标签。

• 那么如何从字符串中删除 [Tags:] 呢？

• 以及如何在 Mysql 表中添加 foreach $string？

Answer 1

首先使用正则表达式删除“标签：”，然后在“，”上拆分。

my $string = "Tags: sweet, yummie, chocolate, dark"
$string =~ s/Tags: //;
my @tags = split /, /, @string;

对于 MySQL 连接，您可以使用 DBI::MySQL。

Answer 2

如果您的标签总是以 column 结尾:，您可以执行以下操作：

#!/usr/bin/perl
use Modern::Perl;
use Data::Dumper;

my $string = "Tags: sweet, yummie, chocolate, dark";
my @parts = split/[:,]\s*/,$string;
say Dumper \@parts;

输出：

$VAR1 = [
          'Tags',
          'sweet',
          'yummie',
          'chocolate',
          'dark'
        ];

Answer 3

Perl 中有一个split函数。

该split函数用于将字符串拆分为更小的部分。您可以将字符串拆分为单个字符、一组字符或正则表达式（模式）。

您还可以指定将字符串拆分为多少个片段。