允许“制作”选项的Perl模块

Question

我想知道是否有某种Perl模块/软件包允许使用简单的类制作功能。

例如，是否有东西可以包装一个接收输入和输出的函数，并且只有在输出不存在或者它比输入早时才执行？

一个快速谷歌搜索给我介绍了这一点：

http://perldoc.perl.org/ExtUtils/MakeMaker.html

但我不知道这是否是我需要的东西（新本......没有多少经验的makefile要么...）。

如果任何人有一个特定的方向或意见，我会很高兴听到这个消息:)

谢谢！

Answer 1

make可以很容易地确定什么是什么的依赖，但你没有要求。我认为以下就足够了：

sub make { 
    my ($func, $targ, @deps) = @_; 
    my $M_targ = -M $targ; 
    for my $dep (@deps) { 
     my $M_dep = -M $dep 
     or die("Error stating dependency $dep: $!\n"); 

     if (-M $_ > $M) { 
     $func->($targ, @deps); 
     last; 
     } 
    } 
} 

make(\&func, $targ, @deps); 

-M获取文件的修改时间。