printing html content with pre tag all one line

[diamondsandperls]

Below is my whois script bc I feel strongly maybe the changes need to be made directly to the whois. What happens when i grab the content and print to txt and when i save in notepad everything goes to one line.

#!perl

use Net::Whois::Raw qw( whois $OMIT_MSG $CHECK_FAIL $CACHE_DIR $CACHE_
+TIME $USE_CNAMES $TIMEOUT );
use strict;
use warnings;

# HTTP HEADER
print "Content-type: text/html \n\n";

my $ip = $ARGV[0];

my ($dominfo,$whois_server) = whois($ip);

print "whois server: $whois_server", "<br><pre>";

print $dominfo, "</pre>";

[kcott]

G'day diamondsandperls,

print does not add newlines for you; perhaps you were thinking of say. The two print statements you have (to output content) contain no newlines.

If you wanted HTML like

whois server: $whois_server<br>
<pre>
$dominfo
</pre>

you'll need to code newlines (\n) in your print statements to achieve this.

Please show some example data to clarify what you are getting and what you actually want.