#!/usr/bin/env perl -l

use strict;
use warnings;


use Time::Piece;

my $t = localtime($^T);
print "\n";

print 'entire time:  ', $t; 
print "\n";

print 'Month: ', $t->month;
print "\n";
print 'Year:  ', $t->year;
##### here in this below code, im trying to change
## unix timestamp of IST
## timezone to get this particular date 
##20th FEB 2014 , 23:59:00
use strict;
     use warnings;
     use DateTime::Format::HTTP;
     my $date = 'Mon, Feb  3 04:00:00 GMT 2003';
     my $dt_class = 'DateTime::Format::HTTP';
     my $dt = $dt_class->parse_datetime($date);
     print $dt_class->format_datetime($dt);