Logo

Programming-Idioms

  • Perl
  • Haskell
import Control.Monad
replicateM_ 10 $ putStrLn "Hello"
print "Hello\n" x 10;

Without using a loop, using the repeat operator.
say "Hello" for 1 .. 10;

Recent (5.10 and later) versions of Perl also provide
say function, which automatically adds the newline.
print "Hello\n" for 1 .. 10;

Note the necessary newline (\n), not to print every time on the same line
with Ada.Text_IO;
use Ada.Text_IO;
for I in 1 .. 10 loop
  Put_Line ("Hello");
end loop;

New implementation...
< >
programming-idioms.org