Cwd モジュールを使って、アップしたディレクトリにgit cloneできるようにした。 今までは、gistに投げた後は、HOMEディレクトリにgit cloneされていたんだけど、すぐにgistにアップしたものを修正したい時に同じディレクトリにあればと思って修正を加えた。…

記事最初の2行を別で抜き出し、サマリー生成後、追加表示する #!/usr/bin/perl use strict; use warnings; use LWP::UserAgent; use URI; use HTML::ExtractContent; use Encode; use Lingua::JA::Summarize::Extract; use Data::Dumper; my $url = shift; m…

HTML::ExtractContent - search.cpan.org Lingua::JA::Summarize::Extract - search.cpan.orgを使って生成。 記事最初の1,2行は、表示されるようにしたほうがいいかな。 #!/usr/bin/perl use strict; use warnings; use LWP::UserAgent; use URI; use HTML::…

LWP::UserAgent - search.cpan.orgでローカルにファイル保存するためのコード。 更新された場合に限って保存するには$ua->mirror($url, $filename);使う #!/usr/bin/perl use strict; use warnings; use Encode; use LWP::UserAgent; use File::Spec; our $C…

Spreadsheet::WriteExcel - search.cpan.orgを使ってエクセルファイル生成 #!/usr/bin/perl use strict; use warnings; use Web::Scraper; use URI; use Spreadsheet::WriteExcel; my $url = $ARGV[0]; my $filename = $ARGV[1]; my $scraper = scraper { pr…

Web::Scraper - search.cpan.orgでcookie設定 #!/usr/bin/perl use strict; use warnings; use Web::Scraper; use URI; use HTTP::Cookies; use Data::Dumper; my $cookie_file = '/path/to/cookies.txt'; my $cookie_jar = HTTP::Cookies->new(file => $coo…

Web::Scraper - search.cpan.orgでproxy設定 #!/usr/bin/perl use strict; use warnings; use Web::Scraper; use URI; use Data::Dumper; my $url = shift; my $http_proxy = 'http:// proxy : port'; my $scraper = scraper { process '', '' => ''; }; $sc…

Config::Pit - search.cpan.orgの使い方 ワンライナーで登録するには以下のとおりで。 perl -MConfig::Pit -e'Config::Pit::set("d.hatena.jp", data=>{ username=>"login_account", password=>"login_pass" })'以上のデータセットで$HOME/.pitにセットされ…

Yahoo！のテキスト解析Web APIで日本語生成（マルコフ連鎖） - ishiducaの日記 - Hatena::Group::Perlを参考にしました。 #!/usr/local/bin/perl use strict; use warnings; use MeCab; use Data::Dumper; my $text = shift || die "You should set argument…

はてなブックマークのタグを集計してランキング表示する。 404 Blog Not Found:最近のはてブで流行している７つのタグをそのまま真似て書いてみた。 #!/usr/bin/perl use strict; use warnings; use HTML::LinkExtor; use XML::LibXML; use Encode; my $url …

gistpのコードを参考にしてコマンドラインからはてなダイアリーにポストするコードを書いてみた（ただ、ポストするだけ）。 任意のファイルの中身を読み込んでそのままポストできる。 echoなどを使って、一行テキストなどもポストできる。 複数ファイルを一…