diff options
| author | Paul Buetow <paul@buetow.org> | 2015-01-02 14:00:56 +0100 |
|---|---|---|
| committer | Paul Buetow <paul@buetow.org> | 2015-01-02 14:00:56 +0100 |
| commit | 4f27f3ea59baa6cfca0ac1df96b1dfedbd83706c (patch) | |
| tree | 79754e3c49216f80cb3ad5579851fca0bf1a31c9 /t/options_version.t | |
initial
Diffstat (limited to 't/options_version.t')
| -rw-r--r-- | t/options_version.t | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/t/options_version.t b/t/options_version.t new file mode 100644 index 0000000..bfe45a1 --- /dev/null +++ b/t/options_version.t @@ -0,0 +1,28 @@ +#!/usr/bin/perl + +# Testing --version, -V + +use strict; +use warnings; +use v5.10; + +use JSON; +use Test::More; + +chdir '..'; +my $json; +my $ret; + +my $version = `cat .version`; +chomp $version; + +$ret = `./mon --version`; +chomp $ret; +cmp_ok($ret, 'eq', $version, 'Testing version'); + +$ret = `./mon -V`; +chomp $ret; +cmp_ok($ret, 'eq', $version, 'Testing version'); + + +done_testing(); |
