t/01-basic_files.t

   1 #!/usr/bin/env perl
   2
   3 use warnings;
   4 use strict;
   5 use Test::More;
   6
   7 use lib('t');
   8 use FindBin;
   9 use lib "$FindBin::Bin/lib/lib/perl5";
  10
  11 plan tests => 3;
  12
  13 use_ok("TestUtils") or BAIL_OUT("fatal error in TestUtils");
  14
  15 my $omd_bin = TestUtils::get_omd_bin();
  16
  17 ok(-f $omd_bin, $omd_bin." exists");
  18 ok(-x $omd_bin, $omd_bin." is executable");