Use of uninitialized value $tmp[0] in hash slice at /home/lanx/B/PL/PM/set.pl line 17.
Use of uninitialized value $tmp[3] in hash slice at /home/lanx/B/PL/PM/set.pl line 17.
(
  { 1 => 1, 2 => 2, 3 => 3, 4 => 4, 5 => 5 },
  { 3 => 3, 4 => 4, 5 => 5, 6 => 6, 7 => 7 },
  { 1 => 1, 2 => 2, 3 => 3, 4 => 4, 5 => 5, 6 => 6, 7 => 7 },
  { 3 => 3, 4 => 4, 5 => 5 },
  { 1 => 1, 2 => 2, 6 => 6, 7 => 7 },
)