Skip to content
Fetching contributors…
Cannot retrieve contributors at this time
17 lines (12 sloc) 395 Bytes
use strict;
use warnings;
use Net::RackSpace::CloudServers;
my $user = $ENV{'CLOUDSERVERS_USER'} or die "Need CLOUDSERVERS_USER environment variable set";
my $key = $ENV{'CLOUDSERVERS_KEY'} or die "Need CLOUDSERVERS_KEY environment variable set";
$Net::RackSpace::CloudServers::DEBUG = 1;
my $CS = Net::RackSpace::CloudServers->new(
user => $user,
key => $key,
Jump to Line
Something went wrong with that request. Please try again.