12345678910111213 ## package Foo;use Module::Compile -base;use strict;use warnings;sub pmc_compile { my ($class, $source) = @_; # Convert $source into (most likely Perl 5) $compiled_output my $filtered = perldlpp('PDL::NiceSlice', $source); return $filtered;}1;
## package Foo;
use
Module::Compile -base;
strict;
warnings;
sub
pmc_compile {
my
(
$class
,
$source
) =
@_
;
# Convert $source into (most likely Perl 5) $compiled_output
$filtered
= perldlpp(
'PDL::NiceSlice'
);
return
}
1;