Select Code to Download

#!perl
use strict;
...
my $vi = $box->reval('5',1);
die "$@ " unless (defined $vi);
print "vi=$vi\n";