Lines Matching refs:replace
791 %Global::replace =
817 %Global::rpl = %Global::replace;
6469 $self->{'len'}{$perlexpr} += length $arg->replace($perlexpr,$quote_arg,$self);
6490 length $arg->replace($perlexpr,$quote_arg,$self);
6757 my %replace;
6788 $arg[$2 > 0 ? $2-1 : $n+$2]->replace($3,$quote_arg,$self)
6796 CORE::push(@{$replace{::shell_quote($word)}}, $w);
6798 CORE::push(@{$replace{$word}}, $w);
6822 CORE::push(@{$replace{$ww}}, $val);
6831 if(%replace) {
6835 sort { length $b <=> length $a } keys %replace);
6837 s/($regexp)/join(" ",@{$replace{$1}})/ge;
7521 sub replace { subroutine