#!/usr/bin/perl

no utf8;

# Net::Radius test input
# Made with $Id: cisco-acs-ar-01.p,v 1.3 2007/01/09 20:01:04 lem Exp $

$VAR1 = {
          'packet' => 'ÖVbõ¦…Í‘Õê“v¾D¹mdia27Èmo  CiscoSecure ACS v4.0(1.27)keª‹`ªÁÔf~À]„',
          'secret' => undef,
          'description' => 'CiscoSecure ACS v4.0 (1.27) - Access-Request',
          'authenticator' => 'bõ¦…Í‘Õê“v¾D¹',
          'identifier' => 214,
          'dictionary' => undef,
          'opts' => {
                      'secret' => undef,
                      'output' => 'packets/cisco-acs-ar-01',
                      'description' => 'CiscoSecure ACS v4.0 (1.27) - Access-Request',
                      'authenticator' => 'bõ¦…Í‘Õê“v¾D¹',
                      'identifier' => 214,
                      'dictionary' => [
                                        'dicts/dictionary'
                                      ],
                      'dont-embed-dict' => 1,
                      'noprompt' => 1,
                      'slots' => 5
                    },
          'slots' => 5
        };


syntax highlighted by Code2HTML, v. 0.9.1