GLite::Data::FileTransferStats
GLite::Data::FileCatalog module provides a Perl client library for the FileTransferStats 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::FileTransferStats->new('https://service.glite.org:8443/example');
my $myArrayOf_soapenc_string = [ 'string1', 'string2', ...];
my $myArrayOf_tns3_TransferSummary = [ $myTransferSummary1, $myTransferSummary2, ... ];
my $myArrayOf_tns3_TransferActivity = [ $myTransferActivity1, $myTransferActivity2, ... ];
my $myArrayOf_tns3_TransferAgent = [ $myTransferAgent1, $myTransferAgent2, ... ];
my $myTransferSnapshot = { time => $mydateTime, numSubmittedJobs => 9999, numPendingJobs => 9999, numActiveJobs => 9999, numDoneJobs => 9999, numHoldJobs => 9999, numFailedJobs => 9999, numCanceledJobs => 9999, numCancelingJobs => 9999, numFinishedDirtyJobs => 9999, numFinishedJobs => 9999, numSubmittedFiles => 9999, numPendingFiles => 9999, numActiveFiles => 9999, numDoneFiles => 9999, numWaitingFiles => 9999, numHoldFiles => 9999, numCancelingFiles => 9999, numCanceledFiles => 9999, numFailedFiles => 9999, numFinishedFiles => 9999, numCatalogFailedFiles => 9999 };
my $myTransferSummary = { channelName => 'string', voName => 'string', snapshots => [ $myTransferSnapshot1, $myTransferSnapshot2, ... ] };
my $myTransferException = { message => 'string' };
my $myAuthorizationException = new TransferException ( );
my $myInvalidArgumentException = new TransferException ( );
my $myServiceBusyException = new TransferException ( );
my $myInternalException = new TransferException ( );
my $myTransferActivityPeriod = { startTime => $mydateTime, endTime => $mydateTime, averageRate => $myfloat, bytesWritten => $mylong };
my $myTransferActivity = { channelName => 'string', voName => 'string', activityPeriods => [ $myTransferActivityPeriod1, $myTransferActivityPeriod2, ... ] };
my $myTransferAgent = { name => 'string', DN => 'string', host => 'string', type => 'string', lastActive => $mydateTime, state => 'string', version => 'string', contact => 'string' };
Copyright (c) 2004 CERN, on behalf of the EU EGEE project. For license conditions see LICENSE file or http://www.edg.org/license.html.