$d=<>;sub _{print$_[1],$/;$_[0]-1&&_($_[0]-1,$"x3 .$_[1].".".$_)for@a};_($d,$_)for@a=1..3
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page