perlで星座取得するDate::Horoscope - satoru.netの自由帳

テクノロジーカテゴリーの変更を依頼記事元:

satoru-net.hateblo.jp

3 usersがブックマークコメント

記事へのコメント2件

注目コメント
新着コメント

invent ãperlã§æåº§ãåå¾ãããã

2009/02/25 リンク

matuken perlで星座を取得する。 Date::Horoscopeを使う。英語表記の星座名、もしくは１月のみずがめ座から始まる配列番号を返してくれる。占い系のコンテンツを作ったりする時に使う。　ソース use Date::Horoscope; ## 誕生日 my $date='1969-05-11'; ## 星座名で取得（英語表記） my $seiza_key = Date::Horoscope::locate($date); ## (aquarius)と表示。９月のてんびん座の意味。 ## 星座の配列番号取得 my $seiza_num = $Date::Horoscope::horoscope{Date::Horoscope::locate($date)}->{position},$/; ## 7が返り値。-1をすると配列順でアクセスできる。

2009/02/17 リンク

注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています

規約違反を報告

いまの話題をアプリでチェック！

バナー広告なし
ミュート機能あり
ダークモード搭載

アプリをダウンロード

perlで星座取得するDate::Horoscope - satoru.netの自由帳

perlで星座を取得する。 Date::Horoscopeを使う。英語表記の星座名、もしくは１月のみずがめ座から始ま... perlで星座を取得する。 Date::Horoscopeを使う。英語表記の星座名、もしくは１月のみずがめ座から始まる配列番号を返してくれる。占い系のコンテンツを作ったりする時に使う。ソース use Date::Horoscope; ## 誕生日 my $date='1969-05-11'; ## 星座名で取得（英語表記） my $seiza_key = Date::Horoscope::locate($date); ## (aquarius)と表示。９月のてんびん座の意味。 ## 星座の配列番号取得 my $seiza_num = $Date::Horoscope::horoscope{Date::Horoscope::locate($date)}->{position},$/; ## 7が返り値。-1をすると配列順でアクセスできる。