Select Code to Download

my %cache;
sub _iso8601_rx {
...
$cache{fulldate} = "$cache{cdate}\\s+$cache{ctime}";

1;

my %cache;
sub _iso8601_rx {
...
ERX

1;

#! perl 
use strict;
...
    "2010-02-01 01:02:03" =~ $rectime;
    "2010-02-01 01:02:03" =~ $recdate;
}