Cantor

Score: 46.17 (pass)

#!perl
map$#.=' 'x(3**$_/3).$#||'-',0..pop;print"$#
"

Score: 48.18 (pass)

#!perl
$#='-';map$#.=' 'x(3**$_/3).$#,1..pop;print"$#
"

Score: 48.26 (pass)

#!perl
$o='-';map$o.=' 'x(3**$_/3).$o,1..pop;print"$o
"