testrail-report.t 286 B

1234567891011
  1. use strict;
  2. use warnings;
  3. use Test::More 'tests' => 2;
  4. #Test that help works
  5. my @args = ($^X,qw{bin/testrail-report --help});
  6. my $out = `@args`;
  7. is($? >> 8, 0, "Exit code OK reported with help");
  8. my $matches = () = $out =~ m/encoding of arguments/ig;
  9. is($matches,1,"Help output OK");