#!/usr/bin/perl
use warnings;
use strict;

my %my_hash = (
    'James' => { 'detection_profile' => 'disable' },
    'Bob'   => {
        'detection_profile'          => 'enable',
        'detection_profile_severity' => '180'
    },
    'Billy' => {
        'detection_profile'          => 'enable',
        'detection_profile_severity' => '180'
    },
    'Stephanie' => {
        'detection_profile'          => 'enable',
        'detection_profile_severity' => '180'
    },

);

foreach my $detective ( keys %my_hash ) {
    print $detective;
    while ( my ( $key, $value ) = each $my_hash{$detective} ) {
        print " ", $value;
    }
    print $/;
}



##</code><code>##

Stephanie enable 180
James disable
Bob enable 180
Billy enable 180