my $mw = MainWindow->new(); $mw->clipboardClear(); $mw->clipboardAppend('clip'); my $selected = $mw->SelectionGet(); MainLoop;