1#! /usr/bin/perl 2# 3# Sample shared secret configuration for Net::Radius::Server 4# 5# Copyright © 2006, Luis E. Muñoz 6# 7# This file defines a 'secret' provider method that returns a simple shared 8# secret. 9# 10# $Id: def-secret.pl 74 2007-04-21 17:13:14Z lem $ 11 12use strict; 13use warnings; 14 15sub { 'secret' } 16