#!/usr/bin/perl use strict; use warnings; use Slic3r::XS; use Test::More tests => 1; is Slic3r::TriangleMesh::XS::hello_world(), 'Hello world!', 'hello world'; my $t = Slic3r::TriangleMesh::XS->new(); $t->ReadSTLFile("../../stl/testcube20mm.stl"); use XXX; XXX($t); __END__