Select Code to Download

#!/usr/bin/perl
use strict;
use warnings;
...
    next if $count{$element} & 1;
    print "$element\n";
}