Cantor

Score: 42.17 (pass)

#!perl -l
for$=(0..pop){s/ |-/$& $&/g^s//-/}print

Score: 45.17 (pass)

#!perl -l
$@.=' 'x3**$#_++.$@||'-'for 0..pop;print$@