$ pm_split_equal_sums.pl
Checking: (1, 3, 8, 4)
	Subsets: (8) and (1, 3, 4)
	Subset sum = 8
Checking: (1, 6, 2)
	Subsets not equal
Checking: (1, 3, 5, 7)
	Subsets: (1, 7) and (3, 5)
	Subset sum = 8
Checking: (4, 3, 2, 2, 1)
	Subsets: (2, 4) and (1, 2, 3)
	Subset sum = 6
Checking: (4, 3, 2, 2, 2, 2, 1)
	Subsets: (1, 3, 4) and (2, 2, 2, 2)
	Subset sum = 8
Checking: (5, 5, 4, 6, 2, 8, 1, 9)
	Subsets: (1, 2, 8, 9) and (4, 5, 5, 6)
	Subset sum = 20