[Perl] zamiana danych

[Gosik]

Chialabym napisac sktypt, ktory w pliku tekst.inp zamienie mi warosci a i b na odpowienidnie liczby z $i oraz $j i storzy odpowienio pliki tekst'$i$j'.inp

Probowalam w nastepujacy sposob:

  #!/usr/bin/perl

    open(FILE, "tekst.inp") || die("Error reading file!!!\n");
    my $lines = join ' ',<FILE>
    close(FILE)

    for (int $i = 1; i<4; i++){
      for (int $j = 1; j<4; j++)
       $lines = s/a/$i/g
       $lines = s/b/$j/g
    }

Niestety nie wiem jak to zrobic, by jednoczesnie byly zmianiane wartosci a i b oraz aby zostaly swtorzone inputy o nazwach: tekst'$i$j'.inp

Czy mozecie mi troche pomoc z tym tematem?