Can't use string ("1") as an ARRAY ref while "strict refs" in use at read_data.pl line 453.at read_data.pl line 455.

foreach my $line ( @{ $server_list_hash{$server} } ) {