The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

use strict;
use FindBin qw($RealBin);
# Win32?
if ($^O eq 'MSWin32') {
plan skip_all => "Skipping all tests: scripts not supported on Windows";
}
# Try executing the scripts in bin to see if at least they run with --version
for my $bin (glob "$RealBin/../bin/*") {
my $base = basename($bin);
ok(-e $bin, "$base exists at $bin");
ok(-x $bin, "$base is executable");
}
done_testing();