Select Code to Download

use strict;
use warnings;
...
my $i = 0;
$str =~ s/example/'example_'.++$i/eg;
print "$str\n";

This example_1 could be another example_2 where the example_3 is the e
+xample_4 I wanted