2 use OpenAFS
::CMU_copyright
;
3 use OpenAFS
::util
qw(:DEFAULT %AFS_Help);
10 my ($host, $ret, %vols, $lvol, %vol);
14 %vols = &AFS_vos_listvldb(undef,"localhost","b",,);
15 $lvol=$vols{'testvol3'};
17 # if it worked it worked...
18 if ($vol{'rwpart'} ne "b") {