Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Perl to Java

Name: Anonymous 2012-02-22 11:29

How would this perl code look like in Java?

http://pastebin.com/GPzQFxPL

Name: Anonymous 2012-02-22 11:39

(defun recur (m n)

  (if (= n m)

    (progn

      (dotimes (i m)

        (write-string "*"))

      (terpri))

    (progn

      (dotimes (i m)

        (write-string "*"))

      (terpri)

      (recur (incf m) n)

      (dotimes (i (- m 1))

        (write-string "*"))

      (terpri))))



(recur 3 5)

Newer Posts