-----Original Message-----
From: "Cruickshanks, Darin" <[EMAIL PROTECTED]>
To: <perl-win32-gui-users@lists.sourceforge.net>
Date: Fri, 17 Oct 2003 09:43:20 +0100
Subject: [perl-win32-gui-users] Quick Question

> I have a script where a user will enter a date in this format
> 25/11/2003 
>  
> Does anyone know of a way with Perl to get the 'day' from this?
> (Mon,Tue etc)
>  

Grab Date::Calc, and:

use Date::Calc qw/Day_of_Week/;

$dow = Day_of_Week($year,$month,$day);

<sig>  Anthony George <[EMAIL PROTECTED]> Systems Engineer.
Do your technical services need medical attention?  We can help.  EMSTS, 
LLC.  800-304-8269   231-720-1600   http://www.emsts.com  2516 Glade 
Muskegon,MI 49444</sig>

(-------------------------------------------------------------)
This electronic mail transmission, including all attachments,
is intended only for the use of the individual to whom it is
addressed and may contain protected information or other
privileged and confidential information.  If you are not the
intended recipient, you are hereby notified that any 
dissemination, disclosure, copying, or use of this 
transmission, any attachment, or any protected 
information or other privileged and confidential information 
contained herein is strictly prohibited.  If you have received 
this communication in error, please notify the sender 
immediately by email and delete the original message and all 
attachments. Thank you.
                                                    _EMLCNFDNT
(-------------------------------------------------------------)



Reply via email to