Help for this page
my $f1 = <<'__EOI__'; //*********************************** ... __EOI__ s/\Q$f1/$f2/g;