The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

DateTimeX::Format::CustomPattern

DESCRIPTION

This role must be composed before DateTimeX::Format.

It adds an attribute "pattern", and behavies cosistant with the call-overriding environment of DateTimeX::Format.

SYNOPSIS

        package DateTimeX::Format::RequiresPattern;
        with 'DateTimeX::Format::CustomPattern';
        with 'DateTimeX::Format';

        package main;

        my $dt = DateTimeX::Format::RequiresPattern->new({
                locale     => $locale
                , timezone => $timezone
                , pattern  => '%H:%M:%S'
                , debug    => 0|1
                , defaults => 0|1
        });

        $dt->parse_datetime( $time, {pattern => '%H:%M'} );