設定ファイルをPerlとmakeとSubversionを使って管理する - 空繰再繰設定ファイル類をperlとmakeとSubversionを使って管理する 設定ファイルをまとめて管理する でMakefileを使って設定ファイルを管理する方法が紹介されてるんだけど、 Makefileを手で生成するのはめんどくせーと言うことで、 サクっとPerlでMakefileを生成するスクリプトを書いてみた。 で、以下スクリプト。 #!perl use strict; use warnings; use File::Find; use FindBin (); my $source = $FindBin::Bin; my @files = (); find( sub { my $path = $File::Find::name; return if ( -d $path ); if ( $path =~ m{^$source/(.+)$} ) { my $filename = $1; #
