foreach (1..1000000) { $str .= "hello\n"; }