Reference found where even-sized list expected at script.pl line 576