| Code Perl |
sub getDate {local ($DATE,$JOUR) = @_;
local @T = localtime(time);
$$DATE = sprintf("ws%04d%02d%02d%02d%02d%02d",$T[5]+1900,$T[4]+1,$T[3],$T[2],$T[1],$T[0]);
$$JOUR = ('Di','Lu','Ma','Me','Je','Ve','Sa')[$T[6]];
}
|
| Code JavaScript |
function getDate(DATE,JOUR) {
var i;
var D = new Date(); D.getTime();
var x = 'ws';
if ((i=D.getYear())<2000) {i += 1900}; x += i.toString();
if ((i=D.getMonth()+1)<10) {x += '0'}; x += i.toString();
if ((i=D.getDate())<10) {x += '0'}; x += i.toString();
if ((i=D.getHours())<10) {x += '0'}; x += i.toString();
if ((i=D.getMinutes())<10) {x += '0'}; x += i.toString();
if ((i=D.getSeconds())<10) {x += '0'}; x += i.toString();
DATE[0] = x;
var T = ['Di','Lu','Ma','Me','Je','Ve','Sa']
JOUR[0] = T[D.getDay()];
}
|