Line | |
---|
1 | use strict; |
---|
2 | use warnings; |
---|
3 | use Test::More; |
---|
4 | |
---|
5 | eval "use Test::Script::Run"; |
---|
6 | plan skip_all => 'Test::Script::Run required' if $@; |
---|
7 | |
---|
8 | plan tests => 5; |
---|
9 | |
---|
10 | run_ok('bin/la-config', "Can launch la-config"); |
---|
11 | |
---|
12 | run_ok('bin/la-query', "Can launch la-query"); |
---|
13 | run_ok('bin/la-query', [ qw(-o group) ], "Can launch la-query"); |
---|
14 | run_not_ok('bin/la-query', [ qw(-o nawak) ], "Can launch la-query"); |
---|
15 | |
---|
16 | run_ok('bin/la-attributes', "Can launch la-attributes"); |
---|
Note: See
TracBrowser
for help on using the repository browser.