my $dt = DateTime::Format::ISO8601->new();
$dt->parse_datetime( $date_string );
print( $dt->is_dst ? 'Y' : 'N' )