for my $p ( $s, !$s ) { # Which point