pyephemに相当するPerlは何ですか?
pyephemはCライブラリ(?)に基づいているので、誰かがPerlバージョンも作成したと思いますか?
libnovaをチェックアウトしましたか?それは非常に強力です。そのためのPerlラッパーがあります:Astro::Nova。
以下のドキュメントを引用すると、これらの1つはあなたが望むことを正確に行うことができます。ラッパーのライブラリドキュメント全体を再現したくなかったため、Perlドキュメントは比較的まばらです。関数は、Cでの動作とほとんど同じです。それからの例外を文書化する必要があります。メインのlibnovaドキュメントにはすべての詳細があります。
(int $status, Astro::Nova::RstTime $rst) =
get_object_rst(double JD, Astro::Nova::LnLatPosn observer, Astro::Nova::EquPosn object)
(int $status, Astro::Nova::RstTime $rst) =
get_object_rst_horizon(double JD, Astro::Nova::LnLatPosn observer,
Astro::Nova::EquPosn object, double horizon)
(int $status, Astro::Nova::RstTime $rst) =
get_object_next_rst(double JD, Astro::Nova::LnLatPosn observer, Astro::Nova::EquPosn object)
(int $status, Astro::Nova::RstTime $rst) =
get_object_next_rst_horizon(double JD, Astro::Nova::LnLatPosn observer,
Astro::Nova::EquPosn object, double horizon)
ここから始めたいと思うかもしれません: