printf$_|'@ %11.3f
',220*2**(++$/12)for'CC#DD#EFF#GG#AA#B'=~/.#?/g