ããã«ã¡ã¯ããã«ã¡ã¯ãsakurako_sã§ãã æ¥æ¬ã®ç¥æ¥ãæ±ããã®ã«ä¾¿å©ãªCalendar::Japanese::Holidayããããµãã£ã¨ç´¹ä»ãã¾ãã ãã®ã¢ã¸ã¥ã¼ã«ã«ã¯2ã¤ã®é¢æ°ãããã¾ãã isHoliday() - æå®æ¥ãç¥æ¥ãªãç¥æ¥åãè¿ã getHolidays() - æå®æã®ç¥æ¥ã¨ãã®ååã®ããã·ã¥ãªãã¡ã¬ã³ã¹ãè¿ã ã³ã¼ããè¦ã¦ã¿ã¾ãããã use strict; use Calendar::Japanese::Holiday; use YAML qw/Dump/; use Perl6::Say; binmode STDOUT, ':utf8'; # ç¥æ¥ã®åå say isHoliday(2012, 1, 9); # æå®æã®ç¥æ¥ say Dump getHolidays(2012, 1); å®è¡çµæã¯æ¬¡ã®éãã æ人ã®æ¥ --- 1: å æ¥ 9: æ人ã®æ¥ æ¯
{{#tags}}- {{label}}
{{/tags}}