Help for this page
#!/usr/bin/perl use strict; ... c+d+e a+d+e a+b+e
#!/usr/bin/perl use strict; ... @results = grep{!$seen{"@$_"}++ }@results; # remove duplicates! print join ("+",@$_)."\n" for @results;