Test at Windows with AppVeyor

.appveyor.yml

@@ -0,0 +1,18 @@
+cache:
+  - C:\strawberry
+
+install:
+  - if not exist "C:\strawberry" choco install strawberryperl -y
+  - set PATH=C:\strawberry\c\bin;C:\strawberry\perl\site\bin;C:\strawberry\perl\bin;%PATH%
+  - cd %APPVEYOR_BUILD_FOLDER%
+  - cpanm --quiet --installdeps --with-develop --notest .
+
+build_script:
+  - perl Build.Pl
+  - perl Build
+
+test_script:
+  - perl Build test # test without Pandoc
+  - cinst -y pandoc
+  - perl Build test # test again with Pandoc
+

.travis.yml

@@ -4,6 +4,7 @@ sudo: required
 dist: trusty    # includes pandoc 1.12.2.1
 
 perl:
+  - "5.26"
   - "5.24"
   - "5.22"
   - "5.20"

lib/Pod/Pandoc.pm

@@ -20,7 +20,8 @@ Pod::Pandoc - process Plain Old Documentation format with Pandoc
 
 # STATUS
 
-[![Build Status](https://travis-ci.org/nichtich/Pod-Pandoc.svg)](https://travis-ci.org/nichtich/Pod-Pandoc)
+[![Unix Build Status](https://travis-ci.org/nichtich/Pod-Pandoc.svg)](https://travis-ci.org/nichtich/Pod-Pandoc)
+[![Windows Build status](https://ci.appveyor.com/api/projects/status/lfskwt20v0ofj5ix?svg=true)](https://ci.appveyor.com/project/nichtich/pod-pandoc)
 [![Coverage Status](https://coveralls.io/repos/nichtich/Pod-Pandoc/badge.svg)](https://coveralls.io/r/nichtich/Pod-Pandoc)
 [![Kwalitee Score](http://cpants.cpanauthors.org/dist/Pod-Pandoc.png)](http://cpants.cpanauthors.org/dist/Pod-Pandoc)
 [![Code Climate Issue Count](https://codeclimate.com/github/nichtich/Pod-Pandoc/badges/issue_count.svg)](https://codeclimate.com/github/nichtich/Pod-Pandoc)
@@ -97,7 +98,7 @@ L<http://pod-pandoc.rtfd.io/en/latest/Pod-Pandoc.html>.
 
 =head1 SEE ALSO
 
-This module is basde on the wrapper module L<Pandoc> to execute pandoc from Perl
+This module is based on the wrapper module L<Pandoc> to execute pandoc from Perl
 and on the module L<Pandoc::Elements> for pandoc document processing.
 
 This module makes obsolete several specialized C<Pod::Simple::...> modules such
@@ -113,6 +114,10 @@ L<Pod::HtmlTree>.
 
 Jakob Voß E<lt>jakob.voss@gbv.deE<gt>
 
+=head1 CONTRIBUTORS
+
+Benct Philip Jonsson
+
 =head1 COPYRIGHT AND LICENSE
 
 Copyright 2017- Jakob Voß

lib/Pod/Simple/Pandoc.pm

@@ -6,6 +6,7 @@ use 5.010;
 our $VERSION = '0.346.0';
 
 use Pod::Simple::SimpleTree;
+use Pod::Perldoc;
 use Pandoc::Elements;
 use Pandoc::Filter::HeaderIdentifiers;
 use Pod::Pandoc::Modules;
@@ -73,12 +74,9 @@ sub parse_file {
 sub parse_module {
     my ( $self, $name ) = @_;
 
-    # map module name to name
-    run3 [ 'perldoc', '-lm', $name ], undef, \$name;
-    croak $? if $?;
-    chomp $name;
+    my ($file) = Pod::Perldoc->new->grand_search_init([$name]);
 
-    $self->parse_file($name);
+    $self->parse_file($file);
 }
 
 sub parse_string {
@@ -134,7 +132,7 @@ sub parse_and_merge {
 sub is_perl_file {
     my $file = shift;
     return 1 if $file =~ /\.(pm|pod)$/;
-    if ( -x $file ) {
+    if ( -f $file ) {
         open( my $fh, '<', $file ) or return;
         return 1 if $fh and ( <$fh> // '' ) =~ /^#!.*perl/;
     }
@@ -467,7 +465,7 @@ C<subtitle>.
 
 =head2 parse_module( $module )
 
-Reads Pod from a module given by name such as C<"Pod::Pandoc">.
+Reads Pod from a module given by name such as C<"Pod::Pandoc"> or by URL.
 
 =head2 parse_string( $string )
 

t/pod-simple-pandoc-parse-modules.t

@@ -1,8 +1,11 @@
 use strict;
 use Test::More;
 use Pod::Simple::Pandoc;
+use Pandoc;
 use Test::Output;
 
+plan skip_all => 'pandoc not available' unless pandoc;
+
 my $modules;
 
 stderr_is {