for($,1,29,for(x,1,49,"
\"'{[:\\$%`#.@?*-"slice(x=($min(30- $))min(x min(49-x)),x+1)print))