#! C:/Perl/bin/perl
use Modern::Perl;
use DateTime::Format::DateManip;

my  $dt = DateTime::Format::DateManip->parse_datetime( 
               "2011-07-24T17:46:33Z" 
          );
say $dt;
# Lock down the parsed time zone
    $dt->set_time_zone( 'UTC' );
say $dt;
# change the time zone
    $dt->set_time_zone( "America/North_Dakota/Center" );
say $dt;