Help for this page
use strict; use warnings; ... )[0]; print qq{Least date is $leastDate\n};
Least date is 01-06-2006