#!/usr/bin/perl print <<'EOCGI'; Content-Type: text/html
Pipe Demo
  foo
  bar
  baz
EOCGI