Perl

I have the following code

#!/usr/bin/perl -w

use CGI;
CGI::ReadParse(*in);

print "Content-type:text/html\n\n";
print "Adding <font color=red><p>$in{email}<p></font>to your blacklist";

The results come out in one line with blocks in between. how do I subsitute
the blocks into new lines ?

In article <dckfbb$ued$(E-Mail Removed)>,
"Jenda Mudron" <(E-Mail Removed)> wrote:

>I have the following code
>
>#!/usr/bin/perl -w
>
>use CGI;
>CGI::ReadParse(*in);
>
>print "Content-type:text/html\n\n";
>print "Adding <font color=red><p>$in{email}<p></font>to your blacklist";
>
>The results come out in one line with blocks in between. how do I subsitute
>the blocks into new lines ?

Try using s///

What does this have to do with Linux networking
Try a perl news group

Jenda Mudron wrote:
> I have the following code
>
> #!/usr/bin/perl -w
>
> use CGI;
> CGI::ReadParse(*in);
>
> print "Content-type:text/html\n\n";
> print "Adding <font color=red><p>$in{email}<p></font>to your blacklist";
>
> The results come out in one line with blocks in between. how do I subsitute
> the blocks into new lines ?
>
>

Jenda Mudron wrote:

> I have the following code
>
> #!/usr/bin/perl -w
>
> use CGI;
> CGI::ReadParse(*in);
>
> print "Content-type:text/html\n\n";
> print "Adding <font color=red><p>$in{email}<p></font>to your blacklist";
>
> The results come out in one line with blocks in between. how do I
> subsitute the blocks into new lines ?


What are blocks? This is not a Perl newsgroup, try posting in
comp.lang.perl.misc with a better description of your problem.


--
Brian Wakem
Email: http://homepage.ntlworld.com/b.wakem/myemail.png