print  grep ({ $DetailSheet{ColumnName}{$_}{XlsColumn} == 2 } keys %{$DetailSheet{ColumnName}} ) ,"\n";
  # Note - grep params are enclosed in parens.