regex - 如何使用 Perl 正则表达式删除所有连字符？

Question

我以为这会做到...

$rowfetch = $DBS->{Row}->GetCharValue("meetdays");
$rowfetch = /[-]/gi;
printline($rowfetch);

但似乎我错过了正则表达式语法的一个小而关键的部分。
$rowfetch总是沿着以下路线:

------S
-M-W---
--T-TF-

等等...代表一周中发生 session 的日子

Answer 1

$rowfetch =~ s/-//gi

这就是你在那里的第二行所需要的。您只是在寻找东西，而不是在没有“s”前缀的情况下实际更改它。

为此，您还需要使用正则表达式运算符“=~”。