… | |
… | |
1098 | |
1098 | |
1099 | Please refrain from using rt.cpan.org or any other bug reporting |
1099 | Please refrain from using rt.cpan.org or any other bug reporting |
1100 | service. I put the contact address into my modules for a reason. |
1100 | service. I put the contact address into my modules for a reason. |
1101 | |
1101 | |
1102 | =cut |
1102 | =cut |
|
|
1103 | |
|
|
1104 | # clumsy hv_store-in-perl |
|
|
1105 | sub _hv_store { |
|
|
1106 | $_[0]{$_[1]} = $_[2]; |
|
|
1107 | } |
1103 | |
1108 | |
1104 | our %FILTER = ( |
1109 | our %FILTER = ( |
1105 | 0 => sub { # rfc4287 datetime, utf-8 |
1110 | 0 => sub { # rfc4287 datetime, utf-8 |
1106 | require Time::Piece; |
1111 | require Time::Piece; |
1107 | # Time::Piece::Strptime uses the "incredibly flexible date parsing routine" |
1112 | # Time::Piece::Strptime uses the "incredibly flexible date parsing routine" |