2 # -----------------------------------------------------------------------------
5 use lib
($0 =~ m
|^(.*/)| ?
$1 : ".");
8 my $file = "arrays.xls";
9 &message
("Check that $file evaluates correctly.");
10 &test_sheet_calc
("$samples/$file", "Summary!B2", sub { /TRUE
/ });