[plack-app-gruntmaster.git] / make_static.PL

#!/usr/bin/perl
use v5.14;
use warnings;

use CSS::Minifier::XS qw//;
use JavaScript::Minifier::XS qw//;

use File::Slurp qw/read_file write_file/;

mkdir 'static';
mkdir 'static/css';

my $common_css;
$common_css .= read_file $_ for <css/*.css>;
for (<css/themes/*>) {
	my ($theme) = m,themes/(.*)\.css,;
	my $css = read_file $_;
	$css .= $common_css;
	write_file "static/css/$theme.css", CSS::Minifier::XS::minify $css;
}

my $js;
$js .= read_file $_ for <js/*.js>;
write_file 'static/js.js', JavaScript::Minifier::XS::minify $js;
Commit	Line	Data
8798626b MG	1	#!/usr/bin/perl
	2	use v5.14;
	3	use warnings;
	4
	5	use CSS::Minifier::XS qw//;
	6	use JavaScript::Minifier::XS qw//;
	7
	8	use File::Slurp qw/read_file write_file/;
	9
	10	mkdir 'static';
	11	mkdir 'static/css';
	12
	13	my $common_css;
	14	$common_css .= read_file $_ for <css/*.css>;
	15	for (<css/themes/*>) {
	16	my ($theme) = m,themes/(.*)\.css,;
	17	my $css = read_file $_;
	18	$css .= $common_css;
	19	write_file "static/css/$theme.css", CSS::Minifier::XS::minify $css;
	20	}
	21
	22	my $js;
	23	$js .= read_file $_ for <js/*.js>;
	24	write_file 'static/js.js', JavaScript::Minifier::XS::minify $js;