view release on metacpan or  search on metacpan

t/option_v.t  view on Meta::CPAN

use v5.40;

use lib ".";
use t::Util qw(run);

my @tests = (
    {
        Name                   => 'long form',
        args                   => ['-version'],
        expected_error_message => '',
        expected_stdout        => "$App::Gimei::VERSION\n",
        expected_stderr        => '',
    },
    {
        Name                   => 'short form',
        args                   => ['-v'],
        expected_error_message => '',
        expected_stdout        => "$App::Gimei::VERSION\n",
        expected_stderr        => '',
    },
);
run(@tests);