Vampire number: Difference between revisions

m
(→‎{{header|Perl 6}}: more efficient code, add concurrency)
Line 2,445:
 
.say for (16758243290880, 24959017348650, 14593825548650).hyper(:1batch).map: {
my"$_: @fangs" =~ (is_vampire($_);.join(', ') || 'is not a vampire number.')
"$_: " ~ (@fangs.join(', ') || 'is not a vampire number.')
}</lang>
 
10,333

edits