in reply to complex checkbox group
You need Date::Calc from CPAN:
#!/usr/bin/perl use Date::Calc qw( Time_to_Date Day_of_Week ); my @weekday=( "Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday" ); my ($y,$mo,$d,$h,$m,$s)=Time_to_Date(time); my $dow = Day_of_Week($y,$mo,$d); print "Today is $weekday[$dow]\n";
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: complex checkbox group
by Anonymous Monk on Jul 21, 2004 at 00:38 UTC | |
by crabbdean (Pilgrim) on Jul 21, 2004 at 04:37 UTC |
In Section
Seekers of Perl Wisdom