EDG::RLS
EDG::RLS module provides access to some RLS methods through SOAP.
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 $rls = EDG::RLS->new('https://rls.example.org:8443/example');
$rls->addMapping ('GUID...', 'srm://...');
$rls->removeMapping ('GUID...', 'srm://...');
The return value will never be undef, because if the PFN doesn't exist it will die with 'NoSuchPfnException'.
$guid = $rls->guidForPfn('srm://....');
This will always have at least one entry, and never be empty. If the guid does not exist in the catalog, then it will die with 'NoSuchGuidException'.
$surls = $rls->getPfns ('GUID....'); print join(',', @$surls), "\n";
Peter.Kunszt <Peter.Kunszt@cern.ch>, Gavin Mccance <Gavin.Mccance@cern.ch>, Akos.Frohner <Akos.Frohner@cern.ch>
Copyright (c) 2004 CERN, on behalf of the EU EGEE project. For license conditions see LICENSE file or http://www.edg.org/license.html.