for my $cmd (@{$hosts{$host}{commands}}){ if(my @check = $telnet->cmd($cmd)){ my $response = join(" ", @check); print "response below \n"; print $response; print $log_fh "$ip $cmd successful\n"; }else{ print $log_fh "$ip Unable to Connect"; } }