NeDi Community

Networking => General Topics => Topic started by: harry on October 11, 2012, 04:52:42 AM

Title: Perl Help for a networking script.
Post by: harry on October 11, 2012, 04:52:42 AM
Hi ,
I am reading a CSV file in perl where date is 10-Oct-12 format, how to convert this date in perl script while reading to "dd/MM/YY format?

I hope some one can help me here.

Tahnks in advance.
Title: Re: Perl Help for a networking script.
Post by: lukas on October 11, 2012, 08:03:28 AM
use Date::Calc qw(:all);
use POSIX;
print strftime( '%d/%m/%y', localtime( Mktime( Decode_Date_EU2( '10-Oct-12', 1 ), 0, 0, 0 ) ) );
Title: Re: Perl Help for a networking script.
Post by: harry on October 12, 2012, 06:34:39 AM
It worked,
Thanks a lot