Select Code to Download

   my $result = function_under_test();
   my $expected = "ciao a tutti";

   is($result, $expected, "strings are equal");

   my @result = split //, $result;
   my @expected = split //, $expected;
...
   for (my $i = 0; $i < @expected; ++$i) {
      is($result[$i], $expected[$i], "$i-th char match");
   }