Someone

$VAR1 = {
          'radiusReplyItem' => [
                                 'Tunnel-Server-Auth-Id="jun1"',
                                 'Tunnel-Medium-Type=1',
                                 'Tunnel-Client-Auth-Id="tunnel_shared"'
                               ],



   foreach my $attribut (keys %{$attributs}) {
      foreach my $value ($attributs->{$attribut}) {
         print $attribut, ": ", $value, "\n";
      }
   }


radiusReplyItem: ARRAY(0x84810ac)