t5901-qpro.pl 401 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10
#!/usr/bin/perl -w
# -----------------------------------------------------------------------------

use strict;
use lib ($0 =~ m|^(.*/)| ? $1 : ".");
use GnumericTest;

# See test_importer comments for mode definitions.
my $mode = ((shift @ARGV) || "check");

11
&message ("Check the Quattro Pro importer.");
12
&test_importer ("$samples/qpro/gantt.wb3", "5913f63dfd3584151505e3231e56a0cd71ba5991", $mode);