InitializeList($pane); sub InitializeList { my ($pane) = @_; }