#!/usr/bin/env perl
use v5.12.5;
use warnings;
our $VERSION = '9999.99.99_99'; # VERSION
use Rex::Commands;
use Test::More tests => 5;
use Test::Warnings;
eval { Rex::Commands::do_task("non_existing_task"); };
my $result = $@;
isnt( $result, undef, 'exception for do_task non-existing task' );
like(
  $result,
  qr/Task non_existing_task not found\./,
  'do_task non-existing task'
);
eval { Rex::Commands::do_task( ["non_existing_task"] ); };
$result = $@;
isnt( $result, undef, 'exception for do_task non-existing task as arrayref' );
like(
  $result,
  qr/Task non_existing_task not found\./,
  'do_task non-existing task as arrayref'
);