The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
#!/usr/bin/perl

use strict;
BEGIN {
	$|  = 1;
	$^W = 1;
}

use Test::More tests => 3;
use Alien::BatToExeConverter ();

my $path = Alien::BatToExeConverter::bat2exe_path();
ok(    $path, 'bat2exe_path is defined'    );
ok( -f $path, 'bat2exe_path exists'        );
SKIP: {
	skip("Not on MSWin32", 1) unless $^O eq 'MSWin32';
	ok( -x $path, 'bat2exe_path is executable' );
}