Graphics::Primitive::Brush(3pm) 			User Contributed Perl Documentation			   Graphics::Primitive::Brush(3pm)

NAME

       Graphics::Primitive::Brush - Description of a stroke

DESCRIPTION

       Graphics::Primitive::Brush represents the visible trace of 'ink' along a path.

SYNOPSIS

	 use Graphics::Primitive::Brush;

	 my $stroke = Graphics::Primitive::Brush->new({
	   line_cap => 'round',
	   line_join => 'miter',
	   width => 2
	 });

METHODS

   Constructor
       new Creates a new Graphics::Primitive::Brush.  Defaults to a width of 1, a line_cap 'butt' and a line_join of 'miter'.

   Instance Methods
       color
	   Set/Get this brush's color.

       dash_pattern
	   Set/Get the dash pattern.  A dash pattern is an arrayref of numbers representing the lengths of the various line segments of the dash.
	   Even numbered elements are considered opaque and odd elements are transparent.

       derive
	   Clone this brush but change one or more of it's attributes by passing in a hashref of options:

	     my $new = $brush->derive({ attr => $newvalue });

	   The returned font will be identical to the cloned one, save the attributes specified.

       equal_to ($other)
	   Returns 1 if this brush is equal to the supplied one, else returns 0.

       line_cap
	   Set/Get the line_cap of this stroke.  Valid values are butt, round and square.

       line_join
	   Set/Get the line_join of this stroke. Valid values are miter, round and bevel.

       not_equal_to ($other)
	   Opposite of equal_to.

       width
	   Set/Get the width of this stroke.  Defaults to 1

AUTHOR

       Cory Watson, "<gphat@cpan.org>"

COPYRIGHT &; LICENSE
       Copyright 2008-2010 by Cory G Watson.

       This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

perl v5.12.3							    2010-08-21					   Graphics::Primitive::Brush(3pm)