$WorkingCopy{$key} = $WorkingCopy{$key} =~ /p1/ ? "this" : "that";