Cantor
Score: 40.17 (pass)
#!perl -l s//-/;for$.(1..pop){s@.@$& $&@g}print
Score: 40.20 (pass)
#!perl -l s//-/;for$i(1..pop){s|.|$& $&|g}print