The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!perl

use Test::More tests => 1;

use strict;
use warnings;

use JavaScript;

# Create a new runtime
my $rt1 = JavaScript::Runtime->new();

# Create a new context
my $cx1 = $rt1->create_context();
my $rval = $cx1->eval_file("t/07-eval-file.js");

is($rval, 51200, "Eval file return value");