{
  package MY;

  sub manifypods {

    my ($self,%attribs) = @_;
    my $result = $self->SUPER::manifypods(%attribs);
    $result =~ s/^(POD2MAN_EXE\s*=\s*)(.+)$/$1$2 -r "v. $self->{VERSION}" -d "\$(REVISION_DATE)"/m;
    return $result;
  }
}

##</code><code>##

POD2MAN_EXE = something