Changeset 47
- Timestamp:
- 01/08/06 00:32:46 (3 years ago)
- Files:
-
- mixi/trunk/post_blog_to_mixi.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
mixi/trunk/post_blog_to_mixi.pl
r46 r47 9 9 use Date::Parse; 10 10 11 my $id = 'xxx@xxxx ';12 my $password = 'xxxx ';13 my $feed_url = ' http://xxxxx/index.rss';11 my $id = 'xxx@xxxxx'; 12 my $password = 'xxxxx'; 13 my $feed_url = 'xxxxx'; 14 14 15 15 my $rai = XML::RAI->parse_string(get($feed_url)); … … 29 29 if($time > $last_update){ 30 30 my $description = "€³€ÎÆüµ€ÎÆâÍÆ€Ï¡¢³°Éô¥Ö¥í¥°€Ëœñ€«€ì€Æ€€€Þ€¹¡£\n" 31 . $item->link . "\n"31 . $item->link . "\n"; 32 32 33 33 my %diary = (
