my  $output = "";
for (1 .. 1000) {
   $output .= get_long_string();
}
print $output;