print $elem . "=" . $status->{$elem} . "\n" if ( $elem eq 'kind' );