如何使用Perl将字符串括在引号内？

Question

我有一个这样的字符串：abc,bcd,def但我需要用单引号括起这个字符串，例如'abc,bcd,def'。

我怎样才能使用perl？

谢谢！

Answer 1

假设您要在变量中引用字符串（例如，$string），您可以使用双引号来构建新引号（例如"'$string'"）。

use strict;
use warnings;

my $string = 'abc,bcd,def';
my $newstring = "'$string'";

print "$newstring\n";

如果要将值分配给变量，可以使用双引号

    my $string = "'abc,bcd,def'";

或q{}

    my $string = q{'abc,bcd,def'};

Answer 2

以这种方式尝试：

my $stringWithSingelQuotes = "'abc,bcd,def'";
print $stringWithSingelQuotes;

Result: 
'abc,bcd,def'

或

my $stringWithSingelQuotes = "'".'abc,bcd,def'."'";
print $stringWithSingelQuotes;

Result: 
'abc,bcd,def'

你甚至可以混合单引号和双引号：

my $stringWithMixedQuotes = "'".'abc,bcd,def'.'"';
print $stringWithMixedQuotes;

Result: 
'abc,bcd,def"