blob: 097d44678124050a1e904140e55c91cc1fb03517 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
#!/usr/bin/perl
use strict;
use warnings;
use Test::More 'no_plan';
BEGIN { use_ok('sneaky1') }
require_ok('sneaky1');
# adapted from ../python/sneaky1_runme.py
is(sneaky1::add(3,4), 7);
is(sneaky1::subtract(3,4), -1);
is(sneaky1::mul(3,4), 12);
is(sneaky1::divide(3,4), 0);
|
