open IN,"<filename.txt" or die "Could not open file : $! \n";
my $step_num = 0;

  while (<IN>) {
	if (/-----------step [\d]\./){
        $step_num ++;
        s/-----------step \d\./-----------step $_\.$step_num/;
        }
  }
close IN;