use Net::OpenStack::Compute::Auth; my $auth = Net::OpenStack::Compute::Auth->new( auth_url => $auth_url, user => $user, password => $key, project_id => $project_id, region => $region, # Optional ); my $token = $auth->token; my $base_url = $auth->base_url;
This class is responsible for authenticating for OpenStack. It supports the old style auth and the new Keystone auth.
Naveed Massjouni <email@example.com>
This software is copyright (c) 2011 by Naveed Massjouni.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.