Example 6-15. examples/intro/t25_calc.t
#!/usr/bin/perl use strict; use warnings; use Test::More tests => 1; is `./mycalc "2 * 2"`, 4, '2*2';
Results
$ perl t25_calc.t 1..1 ok 1 - 2*2
| Prev | Home (Copyright Gabor Szabo) Perl Training Israel | Next |
| Error in the test | Up | Multiple expected values |