1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
  
     | 
    
      #!/usr/bin/perl
no utf8;
# Net::Radius test input
# Made with $Id: cisco-acs-ar-03.p 64 2007-01-09 20:01:04Z lem $
$VAR1 = {
          'packet' => ' VG](rlamadermo  #  CiscoSecure ACS v4.0(1.27)Z9RC#"}',
          'secret' => undef,
          'description' => 'CiscoSecure ACS v4.0 (1.27) - Access-Request',
          'authenticator' => 'G](rl',
          'identifier' => 218,
          'dictionary' => undef,
          'opts' => {
                      'secret' => undef,
                      'output' => 'packets/cisco-acs-ar-03',
                      'description' => 'CiscoSecure ACS v4.0 (1.27) - Access-Request',
                      'authenticator' => 'G](rl',
                      'identifier' => 218,
                      'dictionary' => [
                                        'dicts/dictionary'
                                      ],
                      'dont-embed-dict' => 1,
                      'noprompt' => 1,
                      'slots' => 5
                    },
          'slots' => 5
        };
 
     |