Select Code to Download

extern char * danCGIReplacedCRLF(char * szFixMe){
    int i,j,iLen=0,iNewLen=0;
...

    return szResult;
}

sub MakePtag{
  my ($fixme)=@_;              # take in our parameters
...
  $fixme.='<\p>';              # Append closing <\p> tag
  return $fixme;                
}