my %a = map { $a{ $_ } => 1, 0..5 } 0..9;