1#!/usr/bin/env perl 2use strict; 3use warnings; 4use ntheory qw/is_prime/; 5 6use Test::More tests => 1; 7 8ok(is_prime(7), "ntheory can do is_prime"); 9