5.2. Calculator test

Example 5-2. examples/intro/t01_calc.t

#!/usr/bin/perl
use strict;
use warnings;

system "./mycalc 1  + 1";
print "\n";
system "./mycalc 2 + 2";
print "\n";
system "./mycalc 2 + 2 + 2";
print "\n";

Output:

Example 5-3. examples/intro/t01_calc.out

2
4
4