bit.lyの短縮URLを生成するPerlスクリプトを作ってみた | Pocketstudio.jp log3
◆bit.lyの短縮URLを生成スクリプト bit.lyの短縮スクリプトを生成するのに、わざわざbit.lyを開くのは面倒(;´Д`) コマンドラインで一括変換してくれれば楽じゃね？と、コマンドラインで使えるモノをつくってみました。ちなみに、環境はPerlです。 出来たものは $ shorturl.pl <URL> こちらを実行すると、bit.ly のAPIを叩いて、短縮URLを返してくれるというモノ。 ◆前準備 今回使ったのは CPAN に公開されていた、WebService::Bitly モジュールを使います。サンプルコードが綺麗でわかりやすく、必要最低限のものがそろっていたので。組み込みは cpan コマンドを使えばとても簡単。 # cpan -i WebService::Bitly 私の環境では、結構いろいろな追加モジュールが必要になりました。必要になるものなので、全部いれてしまい
僕のflymake-perl周りの設定晒し最終版（今現在） - taiyoh独言
(require 'flymake) (require 'set-perl5lib) (defadvice flymake-report-status (before flymake-quite-report-status (e-w &optional status)) (if (not e-w) (progn (flymake-mode 0) (flymake-log 0 "switched OFF Flymake mode due to unknown fatal status (maybe tramp is running)")))) (ad-activate 'flymake-report-status) ;; エラーをミニバッファに表示 ;; http://d.hatena.ne.jp/xcezx/20080314/1205475020 (defun credmp/flymake
Perlメモ/CGIモジュール - Walrus, Digit.
フォームデコードなどの機能を持つ、CGI作成者のためのPerlモジュール。 CGIモジュールはHTMLやフォームの生成、フォームデータのパース、Cookieの取得と出力などの機能を持つモジュールです。 いささか重厚長大のきらいはありますが、CGI::Liteモジュールと異なりCGIモジュールは多くの環境でデフォルトインストールされていることなど、CGIモジュールを選ぶべき理由も多くあります。 CGIモジュールには多くのドキュメントが付属しています。 この内いくつかは、Perldoc.jpで和訳した文書を見ることができます。 http://perldoc.jp/docs/modules/ IBMのサイトには「便利なCGIスクリプト作成のためのヒント～CGI.pmモジュールを綿密に検討する」という文書があります。 いささか古いのですが、CGIモジュールを使ったファイルアップローダを検討するのに
文字列を print すると「Wide character in print at」と出力されて困った - BigFatCatのブログ
以下のプログラム（参考：作って学ぶ、今どきのWebサービス: 第2回 RSSフィードの料理はLWPとXML::RSSにおまかせ）を実行したら、「Wide character in print at」というメッセージが print を実行する度に出力されてしまった。 #!/usr/local/bin/perl # http://www.ibm.com/developerworks/jp/webservices/library/itm-ws2-rss/ use strict; use Encode; use LWP::Simple; use XML::RSS; my $url = shift; my $document = LWP::Simple::get($url) or die "cannot get content from $url"; my $rss = XML::RSS->new;
2021年プロ野球選手名鑑 - 野球 - SANSPO.COM（サンスポ）
サンケイスポーツの公式サイト、サンスポ・コム（SANSPO.COM）野球ページです。球団別ニュース、プロ野球速報などを掲載しています。
簡単！たった１３行のコードでHTML取得＆解析をするPerlスクリプト - DQNEO起業日記
１３行のコードで、Yahoo!Japanのトピックス一覧を取得する！ PerlでHTML取得・解析したいときはLWP::UserAgentとHTML::TreeBuilderというのを使うと簡単にできます。 LWP::UserAgentを使うと、Webページの取得ができます。 HTML::TreeBuilderを使うと、HTMLのDOM解析ができます。 この２つのモジュールを使って、Yahoo!Japanのトピックス一覧を取得してみましょう。 コメント行と空行を除くとたったの１３行です。 use strict; use warnings; use LWP::UserAgent; use HTML::TreeBuilder; # urlを指定する my $url = 'http://www.yahoo.co.jp'; # IE8のフリをする my $user_agent = "Mozilla
HTML::Template - CGI スクリプトから HTML テンプレートを使うための Perl モジュール - perldoc.jp
First you make a template - this is just a normal HTML file with a few extra tags, the simplest being <TMPL_VAR> For example, test.tmpl: 最初にテンプレートを作ります - これは <TMPL_VAR> のようにとても簡単な、 2・3 の特殊なタグが入った普通の HTML ファイルです。 例えば、 test.tmpl: <html> <head><title>Test Template</title> <body> My Home Directory is <TMPL_VAR NAME=HOME> <p> My Path is set to <TMPL_VAR NAME=PATH> </body> </html>
Jcode.pm
Jcode.pm - jcode.pl の後継、Encode.pm への架け橋 [英語][日本語] Last Modified:Sunday, 11-May-2008 03:16:47 JST by Dan Kogai Perl 5.8.0 より、Jcodeの全機能は Encode module を通じてPerlに標準装備となります。Jcodeのメンテナンスは旧Perlのために 今後も続けていく所存ですが、最新のPerlをお使いの方には、より高機能、高 性能、そしてなんといっても標準装備の Encode の方をお薦めします。 Jcode 2.0 より、お使いの Perl Version が 5.8.1 以降の場合は Encode の Wrapper として機能するようになりました。 この場合、Jcode.pm は付属モジュールを必要としないため、 jcode.pl の 場合と同様、Jcod
第5回 ExcelファイルとPDFファイルの作成
前回のDBIを使ってデータベースを操作すれば，さまざまな情報を自在に取り出せます。さらに，その結果をExcelファイルやPDF （Portable Document Format）ファイルのように見やすく，扱いやすい形式にしておけば，自分ばかりでなく他の人に渡した際も喜ばれるでしょう。 Excelファイルの作成方法 Excelファイルは1シートの行や列の数に限りがありますが，書式を整えて出力でき，データを容易に加工できるなど便利な形式であることは確かです。利用できるOSが限定される面がありますが，Linux上ではOpenOfficeやGnumericなどExcelファイルを読み出せるソフトウエアであれば利用できます。 PerlからExcelファイルを作成する方法としては，Windows上で「Win32::OLE」を利用してMicrosoft Excel（以下，MS Excel）そのものを用
2008-01-21
前回記事 Web::Scraperを使ってみた - ragutarouの日記 の発展形。 "see more"というリンクがなくなるまでリンクを辿りデータを取得していく。 #!/usr/bin/perl use strict; use warnings; use Web::Scraper; use WWW::Mechanize; use URI; use YAML; my $url = new URI('http://cdbaby.com/top/223'); my $mech = new WWW::Mechanize; $mech->add_header(Connection => 'keep-alive'); $mech->get($url) or die $!; # Scrape my $scraper = scraper { process 'div.albumbox>h3>a',
ドメインとDNS < Wiki | さくらのレンタルサーバ非公式FAQ
often find unexpected finds among the things they leave behind. Used to warn against rushing ahead
KENTと作る! ワンランク上のPerl/CGIプログラミング : KENT-WEB
KENT-WEBトップ > 書籍執筆のご案内 > ワンランク上のPerl/CGIプログラミング KENTと作る! ワンランク上のPerl/CGIプログラミング ・ 出版社：ソシム ＜案内ページ＞ ・ KENT 著 ／ B5変形判 ／ 392ページ ・ ISBN 978-4-88337-535-6 ／ 2007年3月23日発売 ・ 定価2,940円（本体2,800円） 【購入先】 Amazon | cbook24 ■目次 Chapter1 CGIの基礎知識 1-1 CGIとPerl 1-2 CGIプログラム設置作業の基本 1-3 Perl文法の基礎 1-4 CGIのセキュリティについて Chapter2 掲示板を作る [サンプル] 2-1 掲示板を作ってみよう！ Chapter3 検索エンジンを設置する 3-1 検索エンジンを設置してみよう！ Chapter4 ファイルアップローダーを設置す
Perlクイックリファレンス - 1部 Perl入門 - [SMART]
変数は以下のように値を代入したり出力することができます。 # 変数に文字列を代入 $value = "テストです"; # 変数を出力 print $value; 【参照ページ】 変数 配列 複数の値を1つの変数で管理したい場合は、『配列』という変数が最適です。 配列を初期化する場合は､要素をカッコで囲み､各要素毎にカンマで区切ります｡ @week = ('日曜', '月曜', '火曜', '水曜', '木曜', '金曜', '土曜'); 配列はインデックスを使って参照します。インデックスは 0から始まるので注意してください。たとえば1番目のデータ "日曜" を呼び出すときは、$week[0]、"月曜"なら $week[1] とします。 # 配列 @week の1番目の要素を表示 print $week[0], "\n"; > 日曜 # 配列 @week の2番目の要素を表示 print $
![Perlクイックリファレンス - 1部 Perl入門 - [SMART]](https://cdn-ak-scissors.b.st-hatena.com/image/square/efeb6493234f33406d242c048873a805fca99c63/height=288;version=1;width=512/https%3A%2F%2Frfs.jp%2Fwp-content%2Fthemes%2Fsmart%2Fogpimage.png)
Ubuntuにapache2をインストールしてCGIを動かす - 半無限長キープ
Web, Ubuntu何がしたいの？apacheの練習。必要なソフトをインストール。$ sudo apt-get install apache2初期設定は以下のようになっている。設定ファイル/etc/apache2apache2ctl/usr/sbin/エラーログ/val/log/apache2/htmlファイル/val/www/cgi/usr/lib/cgi-bin動作確認/val/www/にindex.htmlを置いてhtmlが見えるかどうか確認。/usr/lib/cgi-bin/にcgiファイルを置いてcgiが動くかどうか確認。/home/username/public_htmlにhtmlファイルを置くモジュールuserdirをロードしておく。$ sudo a2enmodYour choices are: 略Module name? userdir$ /etc/init.d/apac
HTML::TreeBuilder::XPathを使ってみた。 - Shohei Yoshida's Diary
XPathを知りたくてというか実践したくて使ってみた。 返り値となるオブジェクトがいろいろとでてきてわからないが、 そんなときは refとか isaで型をチェックして、ドキュメントを見て ということを繰り返せばなんとかなる。 以下毎度お馴染みのサンプルです。ファイル取得の部分も入れてみた。 #!/usr/bin/perl use strict; use warnings; use HTML::TreeBuilder::XPath; use LWP::Simple; use LWP::UserAgent; use File::Basename; use Time::HiRes; my $url = shift @ARGV or die "usage builder_xpath.pl url\n"; my $tree = HTML::TreeBuilder::XPath->new(); $tr
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Jリーグ選手名鑑2011 - サッカー - SANSPO.COM
PerlによるCSVファイルの高速集計 2
O'Reilly Japan - 発行書籍一覧
モジュールのバージョン確認方法
Web Liberty - フリーCGIスクリプト配布サイト