Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

printing html content with pre tag all one line

by diamondsandperls (Beadle)
on Sep 22, 2012 at 12:27 UTC ( #995100=perlquestion: print w/ replies, xml ) Need Help??
diamondsandperls has asked for the wisdom of the Perl Monks concerning the following question:

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>";

Comment on printing html content with pre tag all one line
Download Code
Replies are listed 'Best First'.
Re: printing html content with pre tag all one line
by kcott (Abbot) on Sep 23, 2012 at 09:35 UTC

    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.

    -- Ken

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://995100]
Approved by chacham
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (7)
As of 2015-08-05 09:35 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The oldest computer book still on my shelves (or on my digital media) is ...













    Results (81 votes), past polls