JavaScript::Minifierでjsをmin化しとく。

jsにコメント書きまくった結果、ソースが無駄にでかくなってしまったので、少しでもファイルを軽くする為に。。
複数ファイルを繋げて1つのファイルにしつつ、コメントとか空白行を取り払う。

#!/usr/bin/perl

use strict;
use warnings;

use Path::Class;
use JavaScript::Minifier qw(minify);

# jsのpath
my $path = '/home/web/root/js/';

# 複数のjsを1つに(htmlで読み込む順でつなぐ)
my $js = '';
my $js1 = file($path.'hoge1.js');
$js .= $js1->slurp;
my $js2 = file($path.'hoge2.js');
$js .= $js2->slurp;
my $js3 = file($path.'hoge3.js');
$js .= $js3->slurp;

# min化
my $min = minify( input => $js );

# hoge_min.jsとして保存
my $op = file($path.'hoge_min.js');
my $w = $op->open('w');
$w->print($min);

$w->close;

__END__