perl-scripts/Formatters/js_beautify

#!/usr/bin/perl

use strict;
use warnings;
use File::Slurper qw(read_text);
use JavaScript::Beautifier qw(js_beautify);

@ARGV && -f $ARGV[0] or die "usage: $0 <js_file>\n";

print js_beautify(
                  scalar read_text(shift) => {
                                              indent_size      => 1,
                                              indent_character => "\t",
                                             }
                 );