use Inline::Perl5;
my $p5 = Inline::Perl5.new;
$p5.use('Math::Float128');
my $f128 = $p5.invoke('Math::Float128', 'new', '1.2345');
say "$f128";
$f128.print;
say '';      # insert the newline
say "ok";