タグ

ブックマーク / hirakun.blog57.fc2.com (4)

  • [Perl][正規表現]小話:$君の動きを再確認してみた話 - Perl

    Oh! lady! A-1 dollar B-2 dollars 淫ら~♪ No, on onn..... ~10$ by SMAP~ はい、スタートのネタ歌詞を検索する為に「smap」検索しようとして無意識に「cmap」を検索していたひらくんです。そう今日はダラーダラー、正規表現で文末を表す位置指定子 $ 君の動きを再確認したお話。 先日こんなソースを拝見しました。 $line = "ABCDEFG\n"; $line =~ s/\n$//; print $line . "TEST\n"; $line = "ABCDEFG\n"; $line =~ s/(\n|.)$//; print $line . "TEST\n"; こいつの実行結果はこうなります。 ABCDEFGTEST ABCDEF TEST 最初の正規表現「$line =~ s/\n$//;」は行末の改行文字を削除する処理です

    zichao
    zichao 2012/02/03
    perlは忘却の彼方
  • CotEditor で Perl の構文チェック - AppleScript

    ふと思いついて作ったら思いのほか便利だった日はCotEditorのスクリプトを紹介。 昔 MacJperl を使っていた人や mi な人にはおなじみなコマンド「Perlの構文チェック」、そいつをスクリプトで実行しようというもの。 Perlの構文チェックは Perl の スイッチ -c と -w を使えば OK なので do shell コマンドで実行して戻り値をダイアログで表示してみた。 Perl構文チェック.scpt set FilePath to "" set FileName to "" tell application "CotEditor" set FilePath to path of document 0 as Unicode text set FileName to name of document 0 as Unicode text set isRun to modif

  • WindowsのUTF-16出力で文字化けが発生する - Perl

    多くの方がWindows上でPerlを使うさいにActivePerlを使用していると思います。私もその一人ですがちょっと前大きな問題に直面しました。 「UTF-16出力すると文字化けが発生する!」 そうなんです。過去の記事で日語の扱いについて紹介しました。じつは、あれらの設定でMac OS X 等で処理しているぶんには問題ないのですがWindows上でActivePerlを使って出力すると特定の文字が化けてしまいます。 特定の文字というのは「上」等の文字コードの中に「0A」なんていうバイナリーデータを含んでいる文字です。 use utf8; binmode STDOUT, ":encoding(cp932)"; binmode STDERR, ":encoding(cp932)"; binmode STDIN, ":encoding(cp932)"; #-書込先ファイルの文字コードを指定

  • Wordのルビ文字をタグで囲んでテキスト出力する - DTP

    さてさて昔からよくあるネタではありますが、Wordで入力されているルビ。あれってテキスト書き出ししたときに、いい具合に情報を残せたらなあって常々思ってました。当に昔からそう思っていたので最近のバージョンでルビのテキスト書き出しにWordが対応しているってことにも気がついてませんでした。なにやらWord2003くらいからテキスト書き出しするとルビか括弧に囲まれて出力されるようになったそうです。 ためしに手元のWord2003でルビ付文字を含む書類を「書式なし」で出力したところ、被ルビ文字の後にルビ文字が続くこんな形式になりました。 ex. 良(よ)い天(てん)気(き) ただこの形式には次のような問題があります。 ・もともと括弧で囲まれていた文字なのかルビ文字として出力されたのかがわからない 「嘘(かな?)ではなく(ほん)気(き)で」 なんていうテキストが出力された場合、元々の文なのかル

  • 1