Help for this page
https://groups.google.com/forum/?fromgroups=#!topic/comp.lang.perl.tk/ +-mMmqk43nhE
use warnings 'all'; use strict; ... print $list2->selectionIncludes(0),"\n"; MainLoop;