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