/usr/lib/perl5/Ogre/ColourValue.pm is in libogre-perl 0.60-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 | package Ogre::ColourValue;
use strict;
use warnings;
# xxx: this should be in XS, but I can't get it to work
use overload
'==' => \&eq_xs,
'!=' => \&ne_xs,
;
1;
__END__
=head1 NAME
Ogre::ColourValue
=head1 SYNOPSIS
use Ogre;
use Ogre::ColourValue;
# (for now see examples/README.txt)
=head1 DESCRIPTION
See the online API documentation at
L<http://www.ogre3d.org/docs/api/html/classOgre_1_1ColourValue.html>
B<Note:> this Perl binding is currently I<experimental> and subject to API changes.
=head1 CLASS METHODS
=head2 Ogre::ColourValue->new($red=1, $green=1, $blue=1, $alpha=1)
I<Parameter types>
=over
=item $red=1 : Real
=item $green=1 : Real
=item $blue=1 : Real
=item $alpha=1 : Real
=back
I<Returns>
=over
=item ColourValue *
=back
=head2 Ogre::ColourValue->DESTROY()
This method is called automatically; don't call it yourself.
=head2 \&eq_xs
This is an operator overload method; don't call it yourself.
=head1 INSTANCE METHODS
=head2 $obj->saturate()
I<Returns>
=over
=item void
=back
=head2 $obj->setHSB($hue, $saturation, $brightness)
I<Parameter types>
=over
=item $hue : Real
=item $saturation : Real
=item $brightness : Real
=back
I<Returns>
=over
=item void
=back
=head2 $obj->r()
I<Returns>
=over
=item Real
=back
=head2 $obj->g()
I<Returns>
=over
=item Real
=back
=head2 $obj->b()
I<Returns>
=over
=item Real
=back
=head2 $obj->a()
I<Returns>
=over
=item Real
=back
=head1 AUTHOR
Scott Lanning E<lt>slanning@cpan.orgE<gt>
For licensing information, see README.txt .
=cut
|