use warnings;
use strict;

use lib '.';
use c_calc;

my $num = c_calc::test(5);

print $num;