#!/usr//bin/perl
$x = <STDIN>;
for ($i=0;$i<100;$i++) {
 print "Hallo Welt\n";
}
