1package My::Module::Sun; 2 3use 5.006002; 4 5use strict; 6use warnings; 7 8use base qw{ Astro::Coord::ECI::Sun }; 9 10use Carp; 11 12our $VERSION = '0.122'; 13 141; 15 16__END__ 17 18=head1 NAME 19 20My::Module::Sun - Fake Sun to test ability to provide one 21 22=head1 SYNOPSIS 23 24 use lib qw{ inc }; 25 use My::Module::Sun; 26 # And then, for example 27 my @rslt = Astro::Coord::ECI::TLE->parse( 28 { sun => 'My::Module::Sun }, 29 $tle_text, 30 ); 31 32=head1 DESCRIPTION 33 34This subclass of L<Astro::Coord::ECI::Sun|Astro::Coord::ECI::Sun> is 35used to test the ability to provide a C<sun> attribute other than the 36default. 37 38This module is private to this distribution, and can be modified or 39retracted without notice. 40 41=head1 METHODS 42 43This class adds no methods. 44 45=head1 ATTRIBUTES 46 47This class adds no attributes. 48 49=head1 SEE ALSO 50 51L<Astro::Coord::ECI::Sun|Astro::Coord::ECI::Sun> 52 53=head1 SUPPORT 54 55Support is by the author. Please file bug reports at 56L<https://rt.cpan.org/Public/Dist/Display.html?Name=Astro-satpass>, 57L<https://github.com/trwyant/perl-Astro-Coord-ECI/issues>, or in 58electronic mail to the author. 59 60=head1 AUTHOR 61 62Tom Wyant (wyant at cpan dot org) 63 64=head1 COPYRIGHT AND LICENSE 65 66Copyright (C) 2018-2021 by Thomas R. Wyant, III 67 68This program is free software; you can redistribute it and/or modify it 69under the same terms as Perl 5.10.0. For more details, see the full text 70of the licenses in the directory LICENSES. 71 72This program is distributed in the hope that it will be useful, but 73without any warranty; without even the implied warranty of 74merchantability or fitness for a particular purpose. 75 76=cut 77 78# ex: set textwidth=72 : 79