Help for this page
$ perl -Mstrict -Mwarnings -E ' my $x = "abc"; ... ' cba aba
$ perl -Mstrict -Mwarnings -E ' my $x = "abc"; ... say $y if index($y, "a") == 2; ' cba