print $_. $/, ,for $_ -18? @;: #### ,map($|--?$" x(-3 *11+ord):$_,