from New York City, but currently living and working in London ... and today
it's very cold here ...
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]
Sent: Friday, November 09, 2001 4:21 PM
To: [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]
Subject: RE: Off-T
Either of these will work -- I'll leave it up to the experts to let us know
which one (if any) is faster or more efficient:
$last_open = sprintf '%04d-%02d-%02d', $data[0]->[17] =~
/^(\d{4})(\d{2})(\d{2})$/;
$last_open = sprintf '%04d-%02d-%02d', unpack 'A4A2A2', $data[0]->[17];
Please note tha
Here are three other possibilities:
1) You might be able to avoid VB entirely by using the
Spreadsheet::ParseExcel module, although I haven't tried it and can't vouch
for it.
2) If Excel is installed on the machine that's running the Perl Script, you
should be able to call the Excel object direc
For most purposes, I've found it much easier to just make a system call to
an external program rather than using a Perl module. I've messed with
Compress::Zlib a bit, which is a standard module, but it seemed to be
overkill for what I needed.
For example, if you have WinZip on your box, you can a
Try the Date::Calc module. It has tons of handy date functions. Example:
use Date::Calc qw(Decode_Date_US Day_of_Week Day_of_Week_to_Text);
my $text = '07/25/01';
#if validity of date is in question
my @date = Decode_Date_US($text);
print ((@date ? Day_of_Week_to_Text(Day_of_Week(@date)) : "not
