TestRail-Perl/t/TestRail-Utils.t

use strict;
use warnings;

use Test::More 'tests' => 4;
use Test::Fatal;
use TestRail::Utils;
use File::Basename qw{dirname};

my ($apiurl,$user,$password);
is(exception {($apiurl,$password,$user) = TestRail::Utils::parseConfig(dirname(__FILE__))}, undef, "No exceptions thrown by parseConfig");
is($apiurl,'http://hokum.bogus',"APIURL parse OK");
is($user,'zippy',"USER parse OK");
is($password, 'happy', 'PASSWORD parse OK');

#Regrettably, I have yet to find a way to print to stdin without eval, so userInput will remain untested.