1package VM::EC2::ELB::Policies::AppCookieStickinessPolicy;
2
3=head1 NAME
4
5VM::EC2::ELB:Policies::AppCookieStickinessPolicy - Object describing
6an Application Cookie Stickiness Policy
7
8=head1 SYNOPSIS
9
10  use VM::EC2;
11
12  $ec2          = VM::EC2->new(...);
13  $lb           = $ec2->describe_load_balancers('my-lb');
14  $p            = $lb->Policies();
15
16  @app_policies = $p->AppCookieStickinessPolicies();
17
18=head1 DESCRIPTION
19
20This object is used to describe the AppCookieStickinessPolicy data type.
21
22=head1 METHODS
23
24The following object methods are supported:
25
26 PolicyName  -- The name of the policy
27 CookieName  -- The name of the application cookie for the policy
28
29=head1 STRING OVERLOADING
30
31In string context, the object will return the policy name.
32
33=head1 SEE ALSO
34
35L<VM::EC2>
36L<VM::EC2::Generic>
37L<VM::EC2::ELB>
38L<VM::EC2::ELB::Policies>
39
40=head1 AUTHOR
41
42Lance Kinley E<lt>lkinley@loyaltymethods.comE<gt>.
43
44Copyright (c) 2012 Loyalty Methods, Inc.
45
46This package and its accompanying libraries is free software; you can
47redistribute it and/or modify it under the terms of the GPL (either
48version 1, or at your option, any later version) or the Artistic
49License 2.0.  Refer to LICENSE for the full license text. In addition,
50please see DISCLAIMER.txt for disclaimers of warranty.
51
52=cut
53
54use strict;
55use base 'VM::EC2::Generic';
56
57use overload
58    '""'     => sub { shift->PolicyName },
59    fallback => 1;
60
61sub valid_fields {
62    my $self = shift;
63    return qw(CookieName PolicyName);
64}
65
661;
67