use Data::Compare;

print Compare( [1, 2], [1, 2] );