NAME
Rose::HTML::Form::Field::DateTime::Range - Compound field for date ranges with separate text fields for the minimum and maximum dates.
SYNOPSIS
$field =
Rose::HTML::Form::Field::DateTime::Range->new(
label => 'Date',
name => 'date',
default => [ '1/2/2003', '4/5/2006' ]);
my($min, $max) = $field->internal_value; # DateTime objects
print $min->strftime('%Y-%m-%d'); # "2003-01-02"
print $max->strftime('%Y-%m-%d'); # "2006-04-05"
$field->input_value('5/6/1980 3pm to 2003-01-06 20:19:55');
my $dates = $field->internal_value;
print $dates->[0]->hour; # 15
print $dates->[1]->hour; # 20
print $dates->[0]->day_name; # Tuesday
print $field->html;
...
DESCRIPTION
Rose::HTML::Form::Field::DateTime::Range is a compound field that represents a date range. It is made up of two subfields: a Rose::HTML::Form::Field::DateTime::StartDate field and a Rose::HTML::Form::Field::DateTime::EndDate field.
The internal value of this field is a list (in list context) or reference to an array (in scalar context) of two DateTime objects. The first object is the start date and the second is the end date. If either of fields are not filled in or are otherwise invalid, then the internal value is undef.
The input value can be a reference to an array of DateTime objects, or strings that can be inflated into DateTime objects by the Rose::HTML::Form::Field::DateTime::StartDate and Rose::HTML::Form::Field::DateTime::EndDate classes. The input value can also be a concatenation of two such strings, joined by a string that matches the field's range_separator_regex.
This class is a good example of a compound field whose internal value consists of more than one object. See below for more compound field examples.
It is important that this class inherits from Rose::HTML::Form::Field::Compound. See the Rose::HTML::Form::Field::Compound documentation for more information.
OBJECT METHODS
- range_separator [STRING]
-
Get or set the string used to join the output values of the start and end date subfields in order to produce this field's output value. The default string is "#". Example:
$field->input_value([ '1/2/2003', '4/5/2006' ]); # "2003-01-02 00:00:00#2006-04-05 00:00:00" print $field->output_value;
- range_separator_regex [REGEX]
-
Get or set the regular expression used to split an input string into start date and end date portions. The default value is
qr(#|\s+to\s+)
. Example:$field->input_value('2005-04-20 8pm to 1/7/2006 3:05 AM'); my($min, $max) = $field->internal_value; print $min->day_name; # Wednesday print $max->day_name; # Saturday # Change regex, adding support for " - " $field->range_separator_regex(qr(#|\s+(?:to|-)\s+)); $field->input_value('2005-04-20 8pm - 1/7/2006 3:05 AM'); ($min, $max) = $field->internal_value; print $min->day_name; # Wednesday print $max->day_name; # Saturday
Note that the
range_separator_regex
must match therange_separator
string.When setting
range_separator_regex
, you should use theqr
operator to create a pre-compiled regex (as shown in the example above) If you do not, then the regex will be recompiled each time it's used.
SEE ALSO
Other examples of custom fields:
- Rose::HTML::Form::Field::Email
-
A text field that only accepts valid email addresses.
- Rose::HTML::Form::Field::Time
-
Uses inflate/deflate to coerce input into a fixed format.
- Rose::HTML::Form::Field::DateTime
-
Uses inflate/deflate to convert input to a DateTime object.
- Rose::HTML::Form::Field::PhoneNumber::US::Split
-
A simple compound field that coalesces multiple subfields into a single value.
- Rose::HTML::Form::Field::DateTime::Split::MonthDayYear
-
A compound field that uses inflate/deflate convert input from multiple subfields into a DateTime object.
- Rose::HTML::Form::Field::DateTime::Split::MDYHMS
-
A compound field that includes other compound fields and uses inflate/deflate convert input from multiple subfields into a DateTime object.
AUTHOR
John C. Siracusa (siracusa@gmail.com)
LICENSE
Copyright (c) 2010 by John C. Siracusa. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.