my @one   = (chr(1), chr(1), chr(1));
my @two   = (chr(1).chr(0).chr(1), chr(1));
say identical(@one, @two); # returns 1