in reply to Re^3: Flip-flop won't DWIM
in thread Flip-flop won't DWIM

An opportunity for the seldom-used reset function to come into play: 
perl -le"for (1..2) { print for grep scalar(??../D/), ('A'..'F'); rese
+t}"

[download]
Caution: Contents may have been coded under pressure.

In Section Seekers of Perl Wisdom