perlbrew perlとstarman - perl、movabletype、perlbrewで可動タイプ5.2+を実行する

可動型を構成するCGIスクリプトとツールには、perlバイナリ名がハードコードされています

#!/usr/bin/perl -w

これらのインスタンスをすべて手動で置き換えない限り

#!/usr/bin/env perl
use warnings;

私の下で可動式を実行することは不可能ですプライベートバージョンのperl（perlbrewと一緒にインストール）これらの変更を手動で行うことなくperlbrew perlの下で可動式を実行できる方法はありますか？

回答：

...あなたのためにそれらを変更するプログラムを書いてください？

#! /usr/bin/env perl
use common::sense;
use Tie::File;

tie my @f, "Tie::File", shift or die $!;
if ($f[0] =~ m,#! */usr/bin/perl( -w)?,) {
$f[0] = "#! /usr/bin/env perl";
splice @f, 1, 0, "use warnings;" if $1
}
untie @f;

何か "のように。