Lines Matching refs:subst
819 my( $regex, $subst, $path, $global, $print, $nmatch, $fl ) = @_;
823 $subst =~ s/\n/\\n/g;
832 \$s = ( substr( \$_, pos() ) =~ s ${regex}${subst}s ) if \$s;
837 { \$s = s ${regex}${subst}s${global};
1168 my( $del, $subst, $fl ) = @_;
1173 $subst = substr( $subst, 1, length($subst) - 2 );
1176 for( my $ic = 0; $ic < length( $subst ); $ic++ ){
1177 my $c = substr( $subst, $ic, 1 );
1180 my $nc = peek($subst,$ic);
1370 my $subst = stripRegex( $del, \$cmd );
1376 $subst = sub2p( $del, $subst, $fl );
1393 $arg = makes( $regex, $subst,