Learned to test using Test::Unit