Help for this page
my ($user); ... delete $user->{'host'}; push @{$user->{'host'}}, $hList; }
Can't use string ("*") as an ARRAY ref while "strict refs" in use at t +est.pl line 16.