On Thu, 31 Jan 2002 22:10:03 -0500, Michael G Schwern wrote:
>$date =~ s{(.*)}{sprintf '%02d/%02d/%d', split '/', $1}e;
$date =~ s{(\d+)/(\d+)/(\d+)}{sprintf '%02d/%02d/%d', $1, $2, $3}e;
--
Bart.
On Thu, 31 Jan 2002 22:10:03 -0500, Michael G Schwern wrote:
>$date =~ s{(.*)}{sprintf '%02d/%02d/%d', split '/', $1}e;
$date =~ s{(\d+)/(\d+)/(\d+)}{sprintf '%02d/%02d/%d', $1, $2, $3}e;
--
Bart.