Help language development. Donate to The Perl Foundation

Inline::Perl5 cpan:NINE last updated on 2020-05-07

t/eval.t
#!/usr/bin/env perl6

use v6;
use Inline::Perl5;

say '1..3';

my $p5 = Inline::Perl5.new();

$p5.run('
    use 5.10.0;
    say "ok 1 - basic eval";
');

$p5.run('
    use 5.10.0;
    use Fcntl;
    say "ok 2 - loading XS modules";
');

$p5.run('
    use 5.10.0;
    use utf8;
    say utf8::is_utf8("Pörl 5")
        ? "ok 3 - Inlined Perl 5 source code is UTF-8 encoded"
        : "not ok 3 - Inlined Perl 5 source code is UTF-8 encoded";
');

$p5.DESTROY;

# vim: ft=perl6