タグ

tipsとPerlに関するmk16のブックマーク (9)

  • tips - モバイルには高画質すぎるH.264動画を劣化ゼロで再生可能に : 404 Blog Not Found

    2012年09月01日07:45 カテゴリTipsiTech tips - モバイルには高画質すぎるH.264動画を劣化ゼロで再生可能に 右の「このデバイスではこの動画は再生できません」状態を、たった一バイト変更するだけで直します。 以下のPerl Scriptで、こうするだけです # デフォルトではlevel 4.1 に変更 % ch264level leveltoohigh.mp4 # level 3.1 に変更 % ch264level -l31 leveltoohigh.mp4 ch264level.pl #!/usr/bin/env perl # # $Id: ch264level.pl,v 0.1 2012/08/31 18:13:16 dankogai Exp dankogai $ # use strict; use warnings; use Getopt::Std; ge

    tips - モバイルには高画質すぎるH.264動画を劣化ゼロで再生可能に : 404 Blog Not Found
    mk16
    mk16 2012/09/01
    神エンコレベルになると、67kbpsとは思えない高画質な動画がある(中身は東方アニメ)→http://mirror05.x264.nl/Dark/Flash/lowbitrateanime.html(技術解説:http://up-cat.net/wiki.cgi?page=x264%28mbtree%29
  • オレオレ検索窓を設置しよう - mixi engineer blog

    まだピクミン2をクリアしてないのでケジメ的に新作ゲームを買えないmikioです。今回は、Tokyo Cabinetを使って激烈簡単に特定サイトの専用の検索機能を設置する方法について説明します。クローリングから検索までを10分くらいの作業で可能にします。 特定サイトの検索エンジン Web全体の検索機能を作るのは、途方もない技術力と設備を持っているGoogleMicrosoftなどのビッグプレーヤでないと難しいのが現実です。でも、自分が気に入っているいくつかのサイトを対象とした検索エンジンを作るのであれば個人だってできます。また、インターネットから手が届かないイントラネットのコンテンツの検索機能は自分達で手がけないと構築できません。 ということで、企業用の検索システムが数多く売られていますし、LuceneやGroongaやHyper Estraierなどのオープンソース製品も世に多数存在しま

    オレオレ検索窓を設置しよう - mixi engineer blog
  • regexp - ^$でなくて\A\zを使おう : 404 Blog Not Found


    2009030900:30 Lightweight LanguagesTips regexp - ^$\A\z使   - ockeghem()  (\x00\x1f, \x7f)   OKOKNGNG/[^ \S]/=~!~使OK/[^ \x{3000}\S]/[] [Run via Codepad] #!perl -
    regexp - ^$でなくて\A\zを使おう : 404 Blog Not Found
  • perl - open my $fh, "comand |"; # はモダンじゃない : 404 Blog Not Found


    2009021001:00 Lightweight Languages perl - open my $fh, "comand |"; #  Perl  Perlentry [5.2 ] P. 141 system("/sbin/wget", "http://example.com");  my $output = `/bin/ls tmp`; open(my $fh, '| cat -v'); /bin/sh使command < from > to 2&>1使
    perl - open my $fh, "comand |"; # はモダンじゃない : 404 Blog Not Found
  • ゆーすけべー日記


    5 2
    ゆーすけべー日記
  • twitterにIRCを通じてアクセスする·tircd MOONGIFT


    IMtwitterIRC便 twitterIRC IRCtwitter tircdPerltwitterIRCtircdIRCtwitter  #twitterUTF-8
    twitterにIRCを通じてアクセスする·tircd MOONGIFT
  • UbuntuでPlaggerやるならこれでいけ!〜VirtualBoxからcronまで〜 - As a Futurist...

    インストールがむずかしいことで評判の「Plagger」ですが,その評判通り 使える様になるまでが大変です.一般的には,CPAN から Plagger を入れれば いいのですが,依存関係が複雑なのと make しながらになるのでやたらと 時間もかかり,一発で入らなかったりと,面倒なことだらけです. この度,さくっと入れる方法が確立できたのでここにメモしておきます. Ubuntu 環境ないよという人のために,Virtualbox という仮想環境に Ubuntu を 入れるところからスタートします.Ubuntu 持ってる人は飛ばして下さい. そして,何よりパッケージを作ってくれた半袖さんには ちょー感謝><! VirtualBox に Ubuntu 入れる VirtualBox とは Sun が提供してるフリーの仮想環境ソフト.これで仮想マシン (こちらをゲストと呼びます)を作ってそこに Ubu

    UbuntuでPlaggerやるならこれでいけ!〜VirtualBoxからcronまで〜 - As a Futurist...
  • バイナリファイルを解析する

    Perlといえばテキスト処理や正規表現が得意で、バイナリを扱うような話についてはあまり聞かない印象があります。Perlが持つ関数pack/unpack等でもバイナリ処理は可能ですが、今回はData::ParseBinaryを使ってバイナリファイルを気軽に解析してみましょう。 基 ファイルからストリームを作る 解析したいファイルをData::ParseBinaryで扱えるストリームに変換します。 use Data::ParseBinary; my $stream = CreateStreamReader(File => $file_handle); 解析したい構造を定義する Struct関数で解析したい構造を定義します。Struct以下には基データ型やコンテナ型、ビット/バイトパディング型、制御構文型等を使用できます。各型に指定したラベルが解析結果として得られるハッシュのキーとなります。

  • 一行野郎(one-liner)はperlにおまかせ


     2008/12/21  dankogai  21使  perl % cat hello.pl print "Hello, world!\n"; % perl hello.pl Hello, world! % -e使 % perl -e'print "Hello, World!\n"' Hello, world! % perl %
  • 1