Graphics::Primitive::Oriented

Some components (or things that use components) require a bit more information than origin and width/height. The orientation role allows a component to specify whether is vertically or horizontally oriented.

    package My::Component;
    
    extends 'Graphics::Primitive::Component';
    
    with 'Graphics::Primitive::Oriented';
    
    1;

is_vertical

Returns true if the component is vertically oriented.

is_horizontal

Returns true if the component is not vertically oriented.

orientation

The way a component is oriented. Values allowed are 'horizontal' or 'vertical'.

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

perl(1)

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.