package Orchard::AWS::CredentialProfile;

use strict;
use warnings;

sub new {
	my $class = shift;
	my $self = shift;
	bless $self, $class;
	$self;
}

sub profile {
	my $self = shift;
	$self->{'profile'};
}

sub key {
	my $self = shift;
	$self->{'aws_access_key_id'};
}

sub secret {
	my $self = shift;
	$self->{'aws_secret_access_key'};
}

sub token {
	my $self = shift;
	$self->{'aws_session_token'};
}

sub region {
	my $self = shift;
	$self->{'region'};
}

1;