#!/usr/bin/perl use strict; use warnings; use JavaScript::SpiderMonkey; my $file_name = $ARGV[0]; if (!$file_name) { print "Usage : js_checker.pl [Java Script file name]?n"; exit; } open my $fh, $file_name or die "Couldn't open $file_name:…