sub MakePtag { my ($s) = @_; $s =~ s!\r\n!</p><p>!g; return "<p>$s</p>"; } [download]
In reply to Re: C vs perl by Anonymous Monk in thread C vs perl by mandog