Perl > Afficher la date d'aujourd'hui

TitreAfficher la date d'aujourd'hui
Postée le21-04-2010
Affichée810
Mini-lien
Description

Date et heure courante

EtatNe contient pas d'erreurs. Ne contient pas d'erreurs.
Code d'insertion
Options
Afficher les numéros de lignes  Mettre la source en plein ecran  Selectionner la source  Partager sur Facebook 
Téléchargement Telecharger en format txt  Telecharger en format pdf  Telecharger en format pl
Plein ecran
#!/usr/bin/perl
my ($sec,$min,$heure,$jour,$mois,$annee) = localtime time;
$annee+=1900;
$mois+=1;
print "Nous somme le $jour/$mois/$annee, il est $heure:$min:$sec\n";