PerlPerl2018-11-28文字列に含まれる複数の数値を考慮したソートPerlディレクトリとファイルの整理をすることになって、ファイル名に基づいて連番を振るリネーム作業が必要になった。10_aa.dat、10_ab.dat、といった感じのファイルをいい感じに並び替える必要があった。Perl5WWW::Mechanizeを使うとリダイレクト処理とかよしなにやってくれて便利。うまくクエリパラメータが渡されてないとかになってくると、やっぱり間の状況もしっかり見たくなる。perlDDNS更新は固定IPを持たない自分としてはとても便利なのだけど、value-domainのDDNS更新はhttp通信のため、DDNS更新用のパスワード情報を傍受される可能性がある。これは非常によろしくないので、セキュアに通信する方法を考える。CPANのミラーにロクに繋がらない状態になって焦ったので。windowsPerlこのあたりがよくまとまってました。PurePerlなFeedPPが結構頑張ってる印象。自分で書いたSAXハンドラーがどんなもんか試した。SAXパーサを使って読み取ってみたくなったので、試した。DOMだと全体を読み取らないとダメなので、場合によってはメモリを食べてしまう。雑メモPerlちょろっとPerl正規表現で遊んでたので、適当に書いとく。find_encodingで得られるオブジェクトを使いまわしてる身としては気になったので。(スレッド間で使いまわすことはないんだけど。使うとファイルか否かの判別ができます。openの戻り値を見ても出来るから、もしかしたら・・・と思ってベンチマークとってみた。調べたら普通にLWPで出来た。POST('http://192.168.11.2...multipart/form-dataで送信する際、任意のfilename値を指定する2012-04-09XSでprintfするだけPerlXSってなんか難しそうと思っていたけど、わりと簡単だった。引数を受け取って処理できるようになってくると、捗りそう。CODE部分はC言語でもりもり書けますし。何から呼ばれたのか、とかそういった情報がなかったので、今までprintデバッグでトレースしてました。diagnosticsプラグマを指定しておくと、dieしたときとかにスタックトレースを出してくれます。...スタックトレースを表示してくれる、diagnosticsプラグマ2012-02-17LWPでgzip圧縮されたコンテンツの取得PerlLWP::UserAgentを使って某FC2の某RSSを取得してたら、どうみてもUTF-8らしからぬデータが返ってきて焦った。Windows前やってダメだった、Windows版PerlへのText::MeCabの導入が出来たっぽいのでメモ。MeCabのバージョンは0.98で、PerlライブラリにText::MeCabを使います。文字コードはUTF-8とします。Perl形態素解析とかよくわかんないけど、偉い人らが作ってるので使ってみたかったの。WINWINな環境で頑張ってたけど、うまくいかないので投げた。おとなしくLinuxでやります。0.9912012-01-22SelfLoaderPerlドキュメント見ればいいです。OKとかびっくりだよ。スマートにならないもんか。EXPR;という書式を初めて知ったので調べた。fields::new()が遅いからですね。いった、変った構文を自分で作ることができます。これを使ってJavaのtry-catch-finally文っぽいものを書いてみました。catch判定がスマートではないので、もう少し改善したい。...Perlでtry-catch-finally文2011-09-19wind0wsのような感じのファイル名ソートをしたいPerl普通の文字列比較では、"a999.txt"と"a1000.txt"では、後者が小さいとみなされます。後者が大きいと判定したほうが、自然です。Wind0wsの場合は数値の部分は数値の比較を行ってくれるようで、ファイル名ソートすると、良い感じにやってくれます。...wind0wsのような感じのファイル名ソートをしたい2011-09-08ファイル内の任意の文字列(バイナリOK)を探索PerlWindowsのファイル内検索システムがクソすぎるので急ぎで作った。http://ideone.com/6QKscデータベースのお勉強がてらに、ただタギングするツール書いた2011-05-08zipで圧縮PerlCSのデモを整理のためにzip圧縮しようとしたら、220個ものデモを手動でぽちぽち圧縮するのはとんでもなく面倒な事に気づいて、コマンドラインで出来れば・・・と思ったので。オレオレバッチ処理プログラミングは楽しい。おまけPerl前の続き。PerlOAuth認証を通過してTwitterの自分のアカウントのTLを取得するプログラムをPerlで書いてみた。間違っていそうだけど、とりあえずTLを取得できたので、その流れをメモ。Net::OAuthとか使うんだろwwwwとか思ってた人、ごめんなさい。要するに、データをキーでハッシュします。これによりデータを認証できます。何か2010-12-05文字列と排他的論理和PerlPerlで文字列に対して排他的論理和(xor)などのビット演算が使える事を知りました。文字列と排他的論理和2010-11-10マジカルインクリメントPerlマジカルインクリメントとかブルートフォース以外で何に使うんだよ・・・マジカルインクリメント2010-11-08カレントディレクトリに対してファイル名にある文字列を含まないファイルを削除PerlPerlうめえ。カレントディレクトリからファイルとディレクトリを全て抽出してくれる。ワンライナーに便利です。strを含まないファイル名をunlinkする。正規表現だと柔軟でいい。ブログを報告するスターをつけました引用をストックしましたストック一覧を見る閉じる引用するにはまずログインしてくださいログイン閉じる引用をストックできませんでした。再度お試しください閉じる限定公開記事のため引用できません。