Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re^3: improving the aesthetics of perl code

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

Help for this page

Select Code to Download


  1. or download this
    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;
    
  2. or download 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
    

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? | Other CB clients
Other Users?
Others chilling in the Monastery: (2)
As of 2022-05-27 03:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (94 votes). Check out past polls.

    Notices?