perl -MText::Diff -e '$size = 10; @a = sort map { int rand(100) } 1..$size; @b = sort map { int rand(100) } 1..$size; print diff \@a, \@b, { STYLE => "Table" };'