We will sort this hash: 
<br>Liz => Davidson
<br>Catherine => Mills
<br>Tom => Mills
<br>James => Kirk
<br>Yonge => Yu
<br>Jim => Mills
<br>Deb => Lee
<br>Bill => Graham
<br>Lee => Hutchinson
<br><p> First by length of last name and then by first name alphabetically:
<p><p><b>@sorted = sort{length($a->[1]) <=> length ($b->[1])} sort{$a->[0] cmp $b->[0]} map{ [$_,$names{$_}] } keys %names;</b><p>
Yu, Yonge
<br>Lee, Deb
<br>Kirk, James
<br>Mills, Catherine
<br>Mills, Jim
<br>Mills, Tom
<br>Graham, Bill
<br>Davidson, Liz
<br>Hutchinson, Lee
<br>