#!/usr/local/bin/perl -w

use blib;

use AFS::CM qw (setcrypt);

my $ok = setcrypt('on');
print "AFS::CODE = $AFS::CODE\n";
print "OK = $ok \n";
