#!/usr/bin/perl
use strict;
use Date::Manip;

Date_Init("TZ=EST5EDT");

print "Hello, World...\n";

my $date = '30-04-2010';

$date = UnixDate($date, "%e/%b/%y");

print $date;