Re: compare two strings and return only he unique values.

[smls]

You can also use List::Compare

use List::Compare;

my ($str1, $str2) = ("ABCDE", "BCDEO");

my @list1 = split //, $str1;
my @list2 = split //, $str2;
my @unique = List::Compare->new(\@list1, \@list2)
                          ->get_symmetric_difference;

say "Unique letters: @unique";