AFS::PTS 2.4.0

AFS::PTS is a Perl class to communicate with the AFS Protection Server. SYNOPSIS use AFS::PTS; my $num_flg = AFS::PTS->convert_numeric_names; my $bits = AFS::PTS->ascii2ptsaccess("S----"); my $flags = AFS::PTS->ptsaccess2ascii($bits); my $pts = AFS::PTS->new; my $id = $pts->createuser(guest); my $entry = $pts->listentry(guest); foreach my $key ( sort keys %$entry) { printf("%20s => %sn", $key, $$entry{$key}); } $ok = $pts->delete(guest); undef $pts; # destroy server connection $pts = AFS::PTS->new; $entry = $pts->dumpentry(67136, 1, 1); foreach my $key ( sort keys %$entry) { printf("%20s => %sn", $key, $$entry{$key}); } my $over = 1; my @names = $pts->getcps(nog, 1, $over); print "OVER = $over n"; print "cps for NOGn"; foreach my $mem (sort @names) { print " $memn"; } AFS::PTS->convert_numeric_names(1); my @ids = (28053, 1, 105, 32000, 32766); @names = $pts->PR_IDToName(@ids); foreach my $name (@names) { print "name = $namen"; } print "Convert(nog): ", $pts->id(nog), "n"; NOTE: The following lines are version 1 style: all names are exported by default. This style is deprecated !!! use AFS; # import all AFS names use AFS @AFS::PTS; # import just the PTS names.

Requirements:	No special requirements
Platforms:	Linux
Keyword:	Afs,  Afs Protection Server,  Afspts,  Entry,  Key,  Libraries,  Names,  Perl,  Print,  Programming,  Pts
Users rating:	0/10