NAME
Geo::GoogleEarth::Pluggable::Plugin::Styles - Pre-loaded Styles for Geo::GoogleEarth::Pluggable
SYNOPSIS
use Geo::GoogleEarth::Pluggable;
my $docuemnt=Geo::GoogleEarth::Pluggable->new;
my $style=$document->IconStyleRedDot;
DESCRIPTION
This package provides methods that when called from a Geo::GoogleEarth::Pluggable document or folder object will be autoloaded and available for use.
If you do not like my colors you can simply at the bottom of your script.
package Geo::GoogleEarth::Pluggable::Plugin::Styles;
use base qw{Geo::GoogleEarth::Pluggable::Plugin::Styles};
sub red {return {red=>255,green=>0, blue=0, alpha=>"95%"}};
sub blue {return {red=>0, green=>0, blue=255,alpha=>"95%"}};
sub green {return {red=>0, green=>255,blue=0, alpha=>"95%"}};
USAGE
Styles
IconStyles
my $style=$document->IconStyleRed(alpha=>"90%");
IconStyleRed
IconStyleOrange
IconStyleYellow
IconStyleGreen
IconStyleBlue
IconStylePurple
IconStyleWhite
IconStyleGray
IconStyleBlack
IconStyleRedDot
my $style=$document->IconStyleRedDot(alpha=>"90%"); #Typical call
IconStyleOrangeDot
IconStyleYellowDot
IconStyleGreenDot
IconStyleBlueDot
IconStylePurpleDot
IconStyleWhiteDot
IconStyleGrayDot
IconStyleBlackDot
IconStylePaddle
my $style=$document->IconStylePaddle("paddle-type"); #see paddle method
LineStyles
LineStyleRed
my $style=$document->LineStyleRed(width=>2,
alpha=>"90%");
LineStyleOrange
LineStyleYellow
LineStyleGreen
LineStyleBlue
LineStylePurple
LineStyleWhite
LineStyleGray
LineStyleBlack
PolyStyles
PolyStyles are AreaStyles with a LineStyle
AreaStyleRed
my $style=$document->AreaStyleRed(alpha=>"90%");
PolyStyleRed
my $style=$document->AreaStyleRed(width=>2,
alpha=>"90%");
AreaStyleOrange
PolyStyleOrange
AreaStyleYellow
PolyStyleYellow
AreaStyleGreen
PolyStyleGreen
AreaStyleBlue
PolyStyleBlue
AreaStylePurple
PolyStylePurple
AreaStyleWhite
PolyStyleWhite
AreaStyleGray
PolyStyleGray
AreaStyleBlack
PolyStyleBlack
Colors
All color methods return a hash reference {red=>$R, green=>$G, blue=>$B, alpha=>$A}
red
my $color=$document->red(alpha=>"90%"); #Typical call
orange
yellow
green
blue
purple
white
gray
black
Icon URLs
All icon methods return a fully qualified url.
dot
my $url=$folder->dot;
paddle
my $url=$folder->paddle;
my $url=$folder->paddle("red-circle"); #default
my $url=$folder->paddle("A");
my $url=$folder->paddle("1");
my $url=$folder->paddle("blu-blank");
shape
my $url=$folder->shape;
my $url=$folder->shape("placemark_circle"); #default
pin
my $url=$folder->pin;
my $url=$folder->pin("ylw"); #default
my $url=$folder->pin("blue");
my $url=$folder->pin("grn");
my $url=$folder->pin("red");
BUGS
SUPPORT
Try geo-perl email list
AUTHOR
Michael R. Davis
CPAN ID: MRDVT
STOP, LLC
domain=>michaelrdavis,tld=>com,account=>perl
http://www.stopllc.com/
COPYRIGHT
This program is free software licensed under the...
The BSD License
The full text of the license can be found in the LICENSE file included with this module.