view release on metacpan or  search on metacpan

lib/Form/Processor/Field/DateTimeManip.pm  view on Meta::CPAN

}

sub format_value {
    my $self = shift;

    return unless my $value = $self->value;
    die "Value is not a DateTime" unless $value->isa( 'DateTime' );

    my $d = $value->strftime( '%a, %b %e %Y %l:%M %p %Z' );

    # The calendar javascript popup can't parse the day & hour with a leading space,
    # so remove.
    $d =~ s/\s(\s\d:)/$1/;
    $d =~ s/\s(\s\d\s\d{4})/$1/;


    return ( $self->name => $d );

}

share/passwords.txt  view on Meta::CPAN

chowchow
chingon
checkmat
CHARLIE
cesare
cerebus
caution
carlisle
campus
camp
calendar
butch1
businessbabe
bulletin
breath
bonghit
blaze1
biteme1
bigred1
bernice
bergen