if (scalar(keys %{$xl})==0) { return False; } else { return True; }