Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re^3: improving the aesthetics of perl code

by BrentDax (Hermit)
on Jan 24, 2005 at 09:56 UTC ( [id://424539]=note: print w/replies, xml ) Need Help??


in reply to Re^2: improving the aesthetics of perl code
in thread improving the aesthetics of perl code

print "<tt>­\n"; print "\n<c­enter­><h3>­MSHIP - my statu­s of host IP's<­/h3><­/cent­e +r>\n­"; my $now=­strft­ime "%m/%­d/%Y %H:%M­:%S", (loca­ltime­); print "<cen­ter>$­now</­cente­r>\n"­; print hr;

Personally, I'd probably use a heredoc for this:

my $now=strftime "%m/%d/%Y %H:%M:%S", localtime; print <<"END"; <tt><center><h3>­MSHIP - my statu­s of host IPs</h3></center> <center>$now</center> <hr /> END

Of course, I wouldn't write HTML like that, but continuing in that direction will only send me way off-topic...

=cut
--Brent Dax
There is no sig.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://424539]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others admiring the Monastery: (4)
As of 2024-03-29 10:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found