http://qs321.pair.com?node_id=1217905


in reply to Re^2: Markup::Perl Review / Demo (Basic CGI Shell)
in thread Markup::Perl Review / Demo (Basic CGI Shell)

The test fails because it doesn't know about how to run shell commands on Windows:

`$perl -e'print 1;'`;

On Windows, the shell only understands double quotes.

Replies are listed 'Best First'.
Re^4: Markup::Perl Review / Demo (Basic CGI Shell)
by usemodperl (Beadle) on Jul 04, 2018 at 20:52 UTC
    Thank you Corion, I missed that. Being the type of person who rummages through error_logs to find new excuses for rewriterules, my mind wonders why someone hasn't fixed that. I don't have perl on windows handy to test if Markup::Perl will work by installing with force.

    STOP REINVENTING WHEELS, START BUILDING SPACE ROCKETS!CPAN 🐪

      Instead of using force, why don't you fix the actual test and send a patch?

      Here is often how I check if a binary is available and executable (usually in my Makefile.PL files, but I digress... here's one example, and another):

      use strict; use warnings; use Test::More; my $is_win = $^O =~ /MSWin/; my ($sep, $bin) = $is_win ? (';', 'perl.exe') : (':', 'perl'); my $perl_available = grep { -x "$_/$bin" } split /$sep/, $ENV{PATH}; ok $perl_available, "perl binary was found and is executable"; done_testing();

      Update: Modified code to work on both Windows and Unixy platforms.

      A reply falls below the community's threshold of quality. You may see it by logging in.

      "my mind wonders why someone hasn't fixed that."

      Probably because nobody uses it.

      A reply falls below the community's threshold of quality. You may see it by logging in.