Help for this page

Select Code to Download


  1. or download this
    $ mkfifo logpipe
$ perl -e 'open PIPE, "< logpipe"; { select 1<<fileno(PIPE),undef,unde
+f,undef; print <PIPE>;redo}' &
  2. or download this
    $ echo foo >logpipe
foo
...
echo fie >logpipe
fie
$
  3. or download this
    $ fg
perl -e 'open PIPE, "< logpipe"; {select 1<<fileno PIPE,undef,undef,un
+def;print <PIPE>;redo}'
# do a Ctrl-C here
$