Help for this page

Select Code to Download

Select or download this

around 'now' => sub {
  my $orig = shift;
...

  return $self->$orig( @_ ) + 0;
}