http://qs1969.pair.com?node_id=766251


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}"

Caution: Contents may have been coded under pressure.