Perl : 대체로 대체되지 않고 입력을 전달하는 방법 s /// 연산자?

Question

예 :

$ test = "abc";
$ test = ~ s/b // g;

정상적으로 테스트됩니다. 이 테스트를 통과하고 여전히 abc를 반환하도록 문자열 "abc"를 어떻게 조작합니까?

명령 삽입을 시도하므로 $ test = ~ s/b // g을 변경할 수 없습니다. 그러나 입력을 변경할 수 있습니다.

바라건대 말이 되네.

Answer 1

/r 한정자를 사용하려고합니다. 이전 버전이

$test = "abc"; 
my $str= $test =~ s/b//gr; 

http://perldoc.perl.org/perlre.html#Modifiers

Answer 2

b 포함 된 문자열을 발생합니다 당신이 s/b//g에 전달할 수있는 문자열은 없습니다를 실행하지 않도록 그것은 new'ish 기능입니다.

그러나 값이 아니라 $test에 대한 액세스 권한이있는 경우 대체 연산자가 찾을 수 없도록 pos을 설정할 수 있습니다. 그것은 이것과 더 많은 유용한 것들을 포함 -

$ perl -e' 
    my $test = "abc"; 
    pos($test) = length($test); 
    $test =~ s/b//g; 
    CORE::say($test); 
' 
ac