while (1) {
  $Str .= 'A few more bytes consumed';
}