#!/usr/bin/env perl use warnings; use strict; my($day, $month, $year) = (localtime)[3,4,5]; $month = sprintf '%02d', $month+1; $day = sprintf '%02d', $day; print $year+1900, $month, $day, "\n";
Prints:
20080311
In reply to Re: Date YYYYMMDD format
by toolic
in thread Date YYYYMMDD format
by LouM
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |