Hash keys can only be strings.

Change

$procs{$ProcessObj} = $a;

keys %procs

delete $procs{$key};
[download]

$procs{ $ProcessObj->GetProcessID() } = $ProcessObj;

values %procs

delete $procs{ $ProcessObj->GetProcessID() };
[download]