in reply to comparing arrays

Most efficient in typing and testing needed :)
use Data::Compare; if (Compare(\@a, \@b)) { # equal }

gav^