# ABSTRACT: ** Please provide abstract ** package Form::Processor::Field::WeekdayStr; $Form::Processor::Field::WeekdayStr::VERSION = '1.162360'; use strict; use warnings; use base 'Form::Processor::Field::Weekday'; # Join the list of values into a single string sub input_to_value { my $field = shift; my $input = $field->input; return $field->value( join '', ref $input ? @{$input} : $input ); } sub format_value { my $field = shift; return () unless defined $field->value; return ( $field->name, [ split //, $field->value ] ); } 1; __END__ =pod =encoding UTF-8 =head1 NAME Form::Processor::Field::WeekdayStr - ** Please provide abstract ** =head1 VERSION version 1.162360 =head1 SYNOPSIS See L =head1 DESCRIPTION This allow storage of multiple days of the week in a single string field. as digits. =head2 Widget Fields can be given a widget type that is used as a hint for the code that renders the field. This field's widget type is: "select". =head2 Subclass Fields may inherit from other fields. This field inherits from: "Weekday". =head1 NAME Form::Processor::Field::WeekdayStr =head1 SUPPORT / WARRANTY L is free software and is provided WITHOUT WARRANTY OF ANY KIND. Users are expected to review software for fitness and usability. =head1 AUTHOR Bill Moseley =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2012 by Bill Moseley. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. =cut