oversættelse af tidsangivelser fra javascript

Jeg har denne stump i javascript, som jeg hellere vil have i PERL.
Kan I hjælpe?
<SCRIPT LANGUAGE="JavaScript">
<!-- BEGIN
Stamp = new Date();
year = Stamp.getYear();
if (year < 2000) year = 1900 + year;
document.write('<font size="2" face="Arial"><B>' + (Stamp.getMonth() + 1) +"/"+Stamp.getDate()+ "/"+ year + '</B></font><BR>');
var Hours;
var Mins;
var Time;
Hours = Stamp.getHours();
if (Hours < 10) {
Hours = "0" + Hours;
}
Mins = Stamp.getMinutes();
if (Mins < 10) {
Mins = "0" + Mins;
}   
Maaned = (Stamp.getMonth() + 1);
if (Maaned < 10) {
Maaned = "0" + Maaned;
}
Dag = Stamp.getDate();
if (Dag < 10) {
Dag = "0" + Dag;
}
Sekund = Stamp.getSeconds();
if (Sekund < 10) {
Sekund = "0" + Sekund;
}

document.write('<input type=hidden name=orderid value='+ year + "." + Maaned + "." + Dag + "." + Hours + "." + Mins + "."  + Sekund +'>');

// End -->
</SCRIPT>