Super Search would have given you lots and lots of options ....
here is one way:
#!/usr/bin/perl use strict; my($day, $month)=(localtime)[3,4]; $month++; if ($month < 10) { $month = "0" . $month; } if ($day < 10) { $day = "0" . $day; } my $date = "$month/$day"; print $date;
HTH
- f o o g o d
In reply to Re: Date formats
by foogod
in thread Date formats
by cybermack72
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |