IDocumentPartitioner partitioner =
new PerlPartitioner(PerlDebugPlugin.getDefault().getLog());
document.setDocumentPartitioner(partitioner);
partitioner.connect(document);
conditionText.configure(new PerlSourceViewerConfiguration(
PerlEditorPlugin.getDefault().getPreferenceStore(), null));
conditionText.setEditable(true);
conditionText.setDocument(document);
Control control = conditionText.getControl();