http://qs1969.pair.com/~perl2/