Help for this page

Select Code to Download

Select or download this

{
  local $/;
...

  while ($data=<INPUT> ) {
  ...