#!/usr/bin/perl no utf8; # Net::Radius test input # Made with $Id: cisco-ios-12.2.18-01.p,v 1.3 2007/01/09 20:01:04 lem Exp $ $VAR1 = { 'packet' => '‹4™ƒ¹¿ ìênÚ7z(³mbejarÓÌEÿˆì±»myõÕäm¡Ä', 'secret' => undef, 'description' => 'Cisco IOS 12.2(18)SXF3 - Access-Request', 'authenticator' => '™ƒ¹¿ ìênÚ7z(³', 'identifier' => 139, 'dictionary' => undef, 'opts' => { 'secret' => undef, 'output' => 'packets/cisco-ios-12.2.18-01', 'description' => 'Cisco IOS 12.2(18)SXF3 - Access-Request', 'authenticator' => '™ƒ¹¿ ìênÚ7z(³', 'identifier' => 139, 'dictionary' => [ 'dicts/dictionary' ], 'dont-embed-dict' => 1, 'noprompt' => 1, 'slots' => 3 }, 'slots' => 3 };