if ($checks->{Detail}) { foreach my $detail (@{$checks->{Detail}->{Row}}) { foreach my $col (@{$detail->{Col}}) { print "$col \n"; } } } ##

##

        
                
                        
                                User
                                Weak Password
                                Locked Out
                                Disabled
                        
                        
                                Guest
                                Weak
                                -
                                Disabled
                        
                        
                                SUPPORT_388945a0
                                -
                                -
                                Disabled
                        
                        
                                Administrator
                                -
                                -
                                -
                        
                
        
        
                
                        
                                Drive Letter
                                File System
                        
                        
                                C:
                                NTFS