Question

我有这样的字符串：

$string= "only this I need"。

我是perl的新手，我试图在perl中翻译PL / SQL代码我的目标是用空格替换"，最后它应该是这样的：

$string = only this I need

在PL / SQL中我使用它，并且运行良好：

REGEXP_REPLACE(string,'"','');

在perl中我尝试了这个，但是无法正常工作：$string=~s/"/'';收到错误。

请帮助我，告诉我需要阅读哪些内容才能正常工作？

Answer 1

试试这个应该有效：

use strict;
use warnings;

my $string= '"only this I need"';

print "$string \n"; #prints "only this I need"

$string =~ s/"/ /g;

print "$string \n"; #prints only this I need

Answer 2

这是一种从字符串中删除引号的方法：

my $string= '"only this I need"';
$string =~ m/"([^"]*)"/;
print "$1\n";

如果您知道第一个和最后一个字符是引号，则可以不使用regex执行此操作，只需使用substr：

my $string= '"only this I need"';
$string = substr $string, 1, -1;
print "$string\n";

替换，用perl替换字符串

2 个答案: