package Wireless::Auth;

our %methods;

...

package Wireless::Auth::Wisc;

sub Wisc { ... }

$Wireless::Auth::methods{ 'Wisc' } => \&Wisc;

1;