$ perl -MO=Deparse,-p -e '$self->selector->remove($self)->listener;'
$self->selector->remove($self)->listener;
-e syntax OK