Newbie Date Question

[MMIMadness]

Just begining to learn perl, and i have come across a small and probably a simple problem which i can't find an answer in the book i've got.

The problem is this. I need to reformat the output of the 'localtime' function to display it in the format dd/mm/yy hh:mm:ss (the english date and time format)

If anyone could help i would be grateful.

Thanks,
MMIMadness

 

[duncdude]

[tt]#!/usr/bin/perl

($seconds, $minutes, $hour, $dayOfMonth, $month, $year, $dayOfWeek, $dayOfYear) = localtime(time);

$month++;
$year += 1900;

$month = sprintf("%02d", $month);
$year = substr($year, 2, 2);
$hour = sprintf("%02d", $hour);
$minutes = sprintf("%02d", $minutes);
$seconds = sprintf("%02d", $seconds);

print "$dayOfMonth/$month/$year $hour:$minutes:$seconds\n";[/tt]


Kind Regards
Duncan

 

[laserBeam]

If you are familiar with Unix date <format> , you can use the Date::Format module....

use Date::Format;
print time2str("%c", time);

Cheers

 

[MMIMadness]

thanks guys

great help,
MMIMadness