Re^3: improving the aesthetics of perl code

[BrentDax]

print "<tt>­\n";
print "\n<c­enter­><h3>­MSHIP - my statu­s of host IP's<­/h3><­/
+cent­er>\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...