Select Code to Download

use strict;
use warnings;
...
} else {
    print add(@ARGV), "\n";
}

$ perl foo.pl test
1..1
ok 1 - Can add two numbers
$ perl foo.pl 4 6
10