perl中的正则表达式(my $me = $0) =~ s#.*[尀⼀|尀尀]##; 是什么意思?

2025-04-07 03:25:47
推荐回答(1个)
回答1:

(my $me = $0) =~ s#.*[\/|\\]##;
把所有 /或者\ 前面(包括/或者\)的字符去掉

(my $mePref = $me) =~ s#(.*).pl#$1#;
表示去掉.pl后缀名。

在s///操作符中,可以用#、!等来作为分隔符。
(my $mePref = $me) =~ s#(.*).pl#$1#;
也可以写为(my $mePref = $me) =~ s/(.*).pl/$1/;

$me是用来控制该脚本在cmd中运行,而不是在cygwin中运行。是这个意思。