Source

project-euler / project-euler / Test.t

1
2
3
4
5
6
7
8
use strict;
use warnings;

use Test::More tests => 1;

# TEST
is(`perl problem-41.pl`, `cat p41.txt`, "Results are ok.");