diff --git a/tools/striker-manage-vnc-pipes b/tools/striker-manage-vnc-pipes
index f526dbc5..633ef42c 100755
--- a/tools/striker-manage-vnc-pipes
+++ b/tools/striker-manage-vnc-pipes
@@ -409,7 +409,7 @@ sub set_ws_process
 		my $tport = $process->{tport};
 
 		$processes->{pids}{$pid}      = $process;
-		$processes->{sources}($sport) = $pid;
+		$processes->{sources}{$sport} = $pid;
 		$processes->{targets}{$tport} = $pid;
 	};
 
@@ -420,7 +420,7 @@ sub set_ws_process
 		my $tport = $process->{tport};
 
 		delete $processes->{pids}{$pid};
-		delete $processes->{sources}($sport);
+		delete $processes->{sources}{$sport};
 		delete $processes->{targets}{$tport};
 	};