Select Code to Download

perl -MO=Deparse,-p -e '... code fragment here ...'

$self->selector->remove($self)->listener;

$self->selector->remove($self->listener);

$ perl -MO=Deparse,-p -e '$self->selector->remove $self->listener;'
Scalar found where operator expected at -e line 1, near "->remove $sel
+f"
    (Missing operator before $self?)
syntax error at -e line 1, near "->remove $self"
-e had compilation errors.

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

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