2 # -----------------------------------------------------------------------------
5 use lib
($0 =~ m
|^(.*/)| ?
$1 : ".");
8 my $file = "gsl.gnumeric";
9 &message
("Check that $file evaluates correctly.");
10 &test_sheet_calc
("$samples/$file", "C2:F2",
12 foreach my $a (split (',')) {
13 return 0 unless $a > 15;