livedoor blogã«è‡ªå‹•æŠ•ç¨¿ - ã†ã›ãƒ¼ã®ãƒ–ãƒã‚°é‹å–¶ã²ã¨ã‚Šã”ã¨æŠ•ç¨¿ã™ã‚‹å†…容ãŒæ±ºã¾ã£ã¦ã„ã‚‹ã¨ã。毎回管ç†ç”»é¢ã‹ã‚‰åŒã˜å†…容を貼り付ã‘ã¦ã€ŒæŠ•ç¨¿ã€ã™ã‚‹ã®ãŒé¢å€’ã ã¨æ€ã†ã“ã¨ãŒã‚ã‚Šã¾ã™ã€‚ ã¨ã„ã†ã“ã¨ã§ã€Perlを使ã£ã¦livedoor blogã«è‡ªå‹•æŠ•ç¨¿ã§ãるスクリプトを作ã£ã¦ã¿ã¾ã—ãŸã€‚æ¡ä»¶ã¨ã—ã¦ã€ タイトルã¯å›ºå®š 本文ã¯hoge.txtã®å†…容をèªã¿è¾¼ã‚€ カテゴリã®æŒ‡å®š 改行を自動的ã«ã™ã‚‹ã‹å¦ã‹ ã¨ã„ã†ã“ã¨ã«çµžã£ã¦è¨˜è¼‰ã—ã¦ã„ã¾ã™ã€‚ #!/usr/bin/perl use strict; use warnings; use IO::File; use WWW::Mechanize; my $file = “./hoge.txtâ€; my $sub = “題åâ€; my $cate = “12345（実際ã®ã‚«ãƒ†ã‚´ãƒªãƒ¼ã®optionã®å€¤ï¼‰â€; my $kaigyo = “1（改行ã™ã‚‹ï¼‰â€; my $start_url = ‘http://member.li
livedoor プãƒãƒã‚¤ãƒ€ - 上級者å‘ã‘æ ¼å®‰ãƒ—ãƒãƒã‚¤ãƒ€
{{#tags}}- {{label}}
{{/tags}}