Pipe test

pipetest.rb

#!/usr/bin/env ruby

r, w = IO.pipe

pid = fork {
  w.close
  $stdin.reopen(r)
  r.close
  IO.select([$stdin], nil, [$stdin])
  exec 'more'
}

r.close
$stdout.reopen(w)
w.close

100.times { |i|
  puts i
}

$stdout.flush
$stdout.close

# In Ruby 1.9+ this waits forever as "more" doesn't seem to get an EOF
Process.waitpid pid