Help for this page

Select Code to Download

Select or download this

C:\temp>perl -wMstrict -E "say scalar (my @a = 'aaa' =~ /./g)"
3

C:\temp>perl -wMstrict -E "say scalar (my @a = 'aaa' ~~ /./g)"
1