DB<107> $s="a"x10 => "aaaaaaaaaa" DB<108> scalar ( ()= $s =~ /a/g ) => 10