Select Code to Download

use Test::More qw(no_plan);

...
    "simple repetition removed");
eq_array([first_filter(qw/one two one/)], [qw/one two/],
    "interleaved repetition removed");