Perl 5 and Perl 6, 23 bytes 19 bytes
print 6-grep '.','' Perl 5 grep first op is always treated as a regex, not so in Perl 6.
Perl 5 and Perl 6,
elcaro
- 321
- 1
- 4
print 6-grep '.','' Perl 5 grep first op is always treated as a regex, not so in Perl 6.