-
- my($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
-
- my $delay = $class->condition_sql_option_integer('delay', $opt{'driver_name'});
+ # ick
+ my $delay = $class->condition_sql_option_integer('delay',
+ $opt{'driver_name'}); # returns 0 for null
+ my $as_of = $opt{'time'} . " - ($delay * 86400)"; # in seconds
+ my $mday;
+ if ( $opt{'driver_name'} eq 'Pg' ) {
+ $mday = "EXTRACT( DAY FROM TO_TIMESTAMP($as_of) )";
+ }
+ elsif ( $opt{'driver_name'} eq 'mysql' ) {
+ $mday = "DAY( FROM_UNIXTIME($as_of) )";
+ }
+ else {
+ return 'true'
+ }