ホーム » 未分類 » iCalendar ファイルの読み書き(Data::ICal )

システム

最近の投稿

  • 日立洗濯機API
    日立の洗濯機は WiFi で接続できるので、nmap をかけてみたが、反応なし。 でも何気なく「日立 洗濯機 […]
  • iPhoneバッテリー交換サービス
    AppleCare 入ってたっけ? AppleCare入ってたっけ? 無償って出てるし、予約してみた。 […]
  • curl で switchbot API v1.1 を呼出す
    Amazon タイムセールで、SwitchBot CO2 センサー付き温湿度計の割引がでていたので、Hub […]
  • Windows 11 Upgrade できるようになった!?
    とっくの昔に、Win11 Upgrade不可能と診断されてたんだけど、なんで今頃 Upgrade […]
  • 文殊山
    最近、運動不足のなか、熊ニュースも多くて山ハイキングができてなかったけど、今シーズン最初の文殊山。 […]

アーカイブ

カテゴリー

iCalendar ファイルの読み書き(Data::ICal )

参考 URL を見て、名前そのものの iCal::Parser 等のインストールを試すが、 途中でエラー等も多発するし、 CGI を作るのであれば、書き込み機能も欲しい。 しかし、iCal::Parser のインストールの途中でインストールしようとする モジュールの中にあった、 Data::ICal の方なら Data::ICal->as_string メソッドもあって便利。

# perl -MCPAN -e shell
cpan> install Data::ICal
でいれてたけど、debian パッケージ探すと、
# apt-get install libdate-ical-perl/unstable
でオッケー。と思ったが CPAN では、Data::ICal , perl では、date-ical ?...
よくよくソースを見ると、Date::ICal は日付データしか扱えないのであった...

さっそく使ってみる。

use Data::ICal ;
use Data::ICal::Entry::Todo ;
use Data::ICal::Entry::Event ;
use Date::ICal ; # 微妙...
my $calendar = Data::ICal->new( filename => $ARGV[0] ) ;
# ToDo の作成
my $new_todo = Data::ICal::Entry::Todo->new() ;
$new_todo->add_properties(
summary => "資料提出" ,
status => 'INCOMPLETE' ,
dtstart => Date::ICal->new( year => 2006 , month => 10 , day => 30 ... )->ical ) ;
$calendar->add_entry( $new_todo ) ;
# Event の作成
my $new_event = Data::ICal::Entry::Event->new() ;
$new_event->add_properties(
summary => "会議" ,
description => "会議の説明" ,
dtstart => Date::ICal->new( epoch => time() )->ical ) ;
$calendar->add_entry( $new_event ) ;
# iCalendar ファイルの出力
print $calendar->as_string ;

Google 検索

My Google   Yahoo

Microsoft

ファンサイト