1 use Test::More qw( no_plan );
9 my $cmd = "$sbindir/amcheckdump " . join(" ", @_) . " 2>&1";
18 # First, try amgetconf out without a config
20 like(amcheckdump(), qr/\AUSAGE:/i,
21 "bare 'amcheckdump' gives usage message");
22 like(amcheckdump("this-probably-doesnt-exist"), qr(could not open conf file)i,
23 "error message when configuration parameter doesn't exist");
26 # Now use a config with a vtape
28 # this is re-created for each test
29 $testconf = Amconfig->new();
30 $testconf->setup_vtape();
33 like(amcheckdump("TESTCONF"), qr(could not find)i,
34 "'amcheckdump' on a brand-new config finds no dumps.");