view release on metacpan or  search on metacpan

t/00-api.t  view on Meta::CPAN

#/usr/bin/env perl

use strict;
use warnings;
use utf8;

use Env;
use POSIX           qw/:fcntl_h/;
use Scalar::Util    qw/weaken/;
use Test::Most;

use FFI::Platypus;
use FFI::Platypus::Buffer;
use FFI::Platypus::Memory   qw/strdup calloc free/;
use FFI::Platypus::Declare;

use constant
{
    S_IFIFO => 0010000,