GLite::Data::FileCatalog
GLite::Data::FileCatalog module provides a Perl client library for the FileCatalog interface.
The methods die if there was a SOAP fault. The fault string and details are added to the die message.
Note: you have to include the VO name in the URL!
my $srv = GLite::Data::FileCatalog->new('https://service.glite.org:8443/example');
my $myArrayOf_soapenc_string = [ 'string1', 'string2', ...];
my $myArrayOf_tns1_StringPair = [ $myStringPair1, $myStringPair2, ... ];
my $myArrayOf_tns1_FCEntry = [ $myFCEntry1, $myFCEntry2, ... ];
my $myArrayOf_tns1_PermissionEntry = [ $myPermissionEntry1, $myPermissionEntry2, ... ];
my $myCatalogException = { message => 'string' };
my $myInternalException = new CatalogException ( );
my $myInvalidArgumentException = new CatalogException ( );
my $myAuthorizationException = new CatalogException ( );
my $myExistsException = new CatalogException ( );
my $myNotExistsException = new CatalogException ( );
my $myStringPair = { string1 => 'string', string2 => 'string' };
my $myPerm = { permission => $myboolean, remove => $myboolean, read => $myboolean, write => $myboolean, list => $myboolean, execute => $myboolean, getMetadata => $myboolean, setMetadata => $myboolean };
my $myBasicPermission = { userName => 'string', groupName => 'string', userPerm => $myPerm, groupPerm => $myPerm, otherPerm => $myPerm };
my $myACLEntry = { principalPerm => $myPerm, principal => 'string' };
my $myPermission = new BasicPermission ( );
my $myStat = { modifyTime => $mylong, creationTime => $mylong, size => $mylong };
my $myLFNStat = new Stat ( );
my $myFCEntry = { lfn => 'string', guid => 'string', permission => $myPermission, lfnStat => $myLFNStat };
my $myPermissionEntry = { item => 'string', permission => $myPermission };
Copyright (c) 2004 CERN, on behalf of the EU EGEE project. For license conditions see LICENSE file or http://www.edg.org/license.html.