t5905-guppi.pl 408 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 12
&message ("Check the guppi graph importer.");
&test_importer ("$samples/b66666-guppi.gnumeric", "4f9552b87482dfa330ed251dffef467939478244", $mode);