• # En perl

    Posté par . En réponse au message Remplacement de chaine connues par leur position. Évalué à 0.

    Double post... pas bien ! Exemple en perl. Il doit y avoir plus rapide en python mais je ne connais pas bien le langage.

    ---------------------- SCRIPT PERL -----------------
    #!/usr/bin/perl

    my $inStr = "aaaaaaaaa bb c bb i tot &&& \$\$";
    my $pos1 = 10;
    my $pos2 = 13;
    my $replace = "var";

    my $out = substr($inStr, $pos1, $pos2-$pos1);
    $out .= $replace;
    $out .= substr($inStr, $pos2, length($inStr));

    print $out."\n";
    -------------------------------------------------------------

    $ ./zeScript.pl
    bb varc bb i tot &&& $$