Help for this page
use PDL; ... } print "To form a set with $X and $Y you need: ", third_card($X, $Y), " +\n";