ファイル末尾の改行を自在にコントロールする - ザリガニが見ていた...。
テキストファイルとは、いくつかの行の集合である。そして、行とは改行コードで区切られるまでの、一連のテキストデータの連続である。 ところで、すべての行の末尾は改行コードで終わるかと言えば、そうとも限らない。改行コードが１つもないテキストファイルも作れるし、最後の行だけ改行コードなしにすることもできる。POSIX基準では、すべての行は改行コードで終わると定義されているようだが、現実のテキストファイルは必ずしもそうなっていないのだ。 ちゃんと改行コードで終わっているか、終わっていないかの違いによって、処理環境によっては思わぬ不具合を誘発してしまうことがある。どちらかに統一する技を覚えておきたい。 改行コードで終わらない場合の不具合 readコマンドは、改行コードで終わらない行を読み取ってくれない...。 $ echo -ne 'ABC\nDEF\n' | while read LINE; do
正規表現のoオプションにPerlの暗黒面を見た - はこべにっき ♨
Perlの正規表現のoオプションてご存じでしょうか? うちはあまり使ったことがなかったのですが，効率のよい正規表現処理を行うときには便利なオプションです． oオプションを使うと，その正規表現のコンパイルが1回しか行われなくなります．たとえば，正規表現の評価が繰り返しのなかで現れると，コンパイルが何度も行われて効率が悪くなります．そういったときにoオプションを付与しておけば，正規表現コンパイルのオーバーヘッドを最小限にとどめることができます． chomp(my $pattern = <>); for my $n (0..100000000000) { # すごく回数の多いループ # oをつければ正規表現がコンパイルされるのははじめの1回だけなので安心 if ($n =~ m/^$pattern$/o) { say "match!"; } } 正規表現が静的な場合は，Perlはこのような最適化
Strawberry PerlをWindowsにインストールする - Perl入門ゼミ
Perl › インストール Strawberry Perl(ストロベリーパール)はWindowsでPerlを利用するために作成されたPerlのディストリビューションのひとつです。 Strawberry Perl for Windows Strawberry Perlの良いところは、 Unix/Linux環境のPerlと近い感覚で使うことができる gccなどの開発環境が準備されていて、CPANモジュールがインストール可能 古いバージョンのPerlも公開されている です。 PerlのUnix生まれの言語なので、WindowsでもなるべくUnix環境に近い感覚で利用できると使いやすく感じます。 Strawberry Perlを使うと、ほとんどのCPANモジュールがインストールが可能です。 古いバージョンのPerlもそのまま残してくれているので、開発をしていて、古いPerlがダウンロードできなくな
正規表現の先読み・後読みを極める！
柔軟性の高い正規表現を書こうとすると、避けて通れないのが先読み・後読みです。 先読み・後読みに関して、いままではとりあえず的な理解をしていたのですが、それだと説明できない正規表現に遭遇したので、説明できるまで理解を深めてみました。 とりあえず的な理解 正規表現を使って間もない人が先読み・後読みを理解するための説明です。 肯定的先読み (?=pattern) 次の正規表現では直後に def がある abc（def は含まない）に一致します。
ポータブルなGitHubシステム「GitPrep 2.6」 リリース - 「Wiki機能」が追加され、ドキュメントが書けるように。 - Perl入門ゼミ
GitHubのポータブルなクローン「GitPrep 2.6」が、2016年6月10日にリリースされました。 「Wiki機能」が追加され、ドキュメントを書けるようになりました。 このリリースでリポジトリ、プルリクエスト、イシュー、Wikiという主要な4つの機能が実装されました。 上部のタブにWikiが追加されています。 ぜひGitPrepのサンプルを試してみてください。ポータブルな本物のGitHubシステムであることが実感できると思います。 GitPrepの特徴 初めて利用される方のために、GitPrepの特徴をご紹介! GitHubのクローン。GitPrepは使い慣れたGitHubと同じインタフェースを持っています リポジトリ、プルリクエスト、イシュー、Wikiをサポート issueシステムのサポート ポータブル。GitPrepをあなたのUnix/Linuxサーバーにインストールできます。
'.' in @INC問題とその対処法について(2017年3月版) - Charsbar::Note
YAPC::HokkaidoやYAPC::Kansaiで話した通り、Perl 5.26ではセキュリティ上の問題で@INCにカレントディレクトリが含まれなくなります。p5pやツールチェーン側ではその影響を軽減すべくCPANクライアントやTest::Harnessに従来の挙動を残すような仕組みを用意中ですが、現時点ではまだすべての対策が出そろっているわけではありません。最終的にどうすべきかは5月に開催される予定のPerl Toolchain Summit (旧Perl QA Hackathon)後にあらためてまとめるつもりですが、直接的な影響を受けるCPAN Authorのところには順次バグレポートが届いているかと思いますので、可能であれば以下の対応をご検討ください。 incディレクトリなどにMakefile.PL/Build.PL用の特殊なモジュールなどを同梱している場合 カレントディレクト
Big Sky :: split の動きが ruby だけ違う件で、炎上しておいて下さいと言われたので...
« 1日1個 golang のクイズを出す twitter アカウント @DailyGolangQuiz の質問に答えてみた。 | Main | Perl6 で俺俺 Gyazo 作った。 » 追記 perl もでした。。。 随分前の話だけど こういう仕様だとは分かったが、len(strings.Split("", ","))が1になるのが納得いかん。 #golang — Sheile (@Sheile) August 19, 2015 僕にはドキュメントでは「分割できなかったときは、要素が文字列1つだけの配列を返します。」って書いてあるのに "a".split(/,/).size が1になり、 "".split(/,/).size が0になるrubyの方が分からない。 — mattn (@mattn_jp) August 19, 2015 javascript "".split(",").
Perl開発者Larry Wall氏が、Perl 6.0の正式バージョンを2015年のクリスマスにリリースすると発言、Perl開発者の中には懐疑的な見方も
Perlの開発者であるLarry Wall氏が、ブリュッセルで開催中のオープンソース開発者カンファレンス「FOSDEM」において、2月1日（現地時間）に、同氏が2015年に61歳の誕生日を迎えることを明らかにするとともに、Perl 6.0のバージョン1.0を2015年のクリスマスにリリースすると発言した。 Perlは現在、最新バージョンであるPerl 5系列と、開発中のPerl 6系列に分岐しており、Perl 6の開発は2000年のスタート以来、難航している。なお、Perl 6では言語仕様の大幅な変更が行われており、Perl 4やPerl 5との後方互換性が失われる。 今回のLarry Wall氏の発言について、Perl開発者の中には懐疑的な見方もあり、今回の発言によって、2015年のクリスマスにPerl 6のバージョン1.0が確実にリリースされるわけではないが、バージョン1.0について語
職業としてのPerlを書き続けることの難しさとPerl教育革命 - はてな村定点観測所
2014-08-26 職業としてのPerlを書き続けることの難しさとPerl教育革命 もうすぐ、世界最大のPerlの祭典・YAPC::Asiaですね。 私も２日間、慶應義塾日吉キャンパスまで遊びに行きます。 ただ、最近やはり正直Perlに関して思うところはあるんですよね〜。職業としてのPerlを選択できる道は年々狭くなっているなと。それこそ針の穴をラクダが通るよりも難しい。 以前、「ついに顕在化し始めたPerlリスク」なんて増田の投稿が出たりして、詳しい人から手斧が投げられたりしましたが、やはり年々Perlを採用する企業は増えていないし、YAPCのスポンサーを見ていても毎回ほぼ同じ企業が並びますよね。スピーカーも人気を集める人は固定化されてて、（Perlだけじゃない話をする場とはいえ）インフラ系の話題の比重も大きくなっています。 私は1999年にPerlの魅力に触れてから、ずっとPerlを
Perl (PSGI) で zip ファイルを動的に作りつつ順次クライアントに送りつける | tech - 氾濫原
滅多にないことだと思うが、非常に大きな zip ファイルを動的に生成してダウンロードさせるみたいなことをしたいことがあるかもしれない。 Archive::Zip だとストリーム生成できないので、Archive::Zip::SimpleZip を使う。Archive::Zip::SimpleZip だとストリーム出力で file handle などに書き出せる。 これで一度ファイルに書いてから、そのファイルを sendfile 的にレスポンスしてもいいのだけれど、書いている間はクライアントからしてみれば完全に無反応になるので、場合によってはタイムアウトになってしまうことがある。そこでストリーム出力をそのままクライアントにストリームしたくなる。 簡単なコードにすると以下のようになった。Archive::Zip::SimpleZip にコールバックかオブジェクトを渡せたらいいが、渡せないようなの
perl のライブラリ(ライセンスはperlと同じ)をrubyに移植した場合、GPL汚染を受けるのか？ - iiirc
perl のライブラリ(ライセンスはperlと同じ)をrubyに移植した場合、GPL汚染を受けるのか？ 14:41 sonots: ライセンス周りに詳しい方におききしたいのですが、perl のライブラリ(ライセンスは perl と同じ、と書いてある)を ruby に移植した場合、GPL 汚染を受けるでしょうか？ ★1 14:42 kazuho: Perl のライセンスは Artistic と GPL の dual license （利用者がどちらかを選ぶ）なので ★0 14:42 kazuho: ruby へ移植した版でも、dual license のまま行くことができます ★0 14:43 kazuho: で、ユーザーが artistic を選択すれば、GPLによる制約はうけないことになります ★0 14:43 yosuke_furukawa: 勉強になった ★0 14:44 sonot
Lingua::JA::Regular::Unicodeモジュール - Perl入門ゼミ
Perl › モジュール › here 古きJcodeには、半角カタカナを全角カタカナに変換するh2zというメソッドがあったが、現代的なPerlであれば、Jcodeは使わない。現代的なPerlでは、文字列はプログラムの内部では、内部的な文字列として扱うのがよい方法だからだ。 古いコードを置き換えるにはLingua::JA::Regular::Unicodeモジュールのkatakana_h2z関数を使うのがよいと思う。 use utf8; use Lingua::JA::Regular::Unicode 'katakana_h2z'; my $str_h = 'ｱｲｳｴｵ'; my $str_z = katakana_h2z $str_h; このソースコードはUTF-8で保存する必要があります。
正規表現によるバリデーションでは ^ と $ ではなく \A と \z を使おう
正規表現によるバリデーション等で、完全一致を示す目的で ^ と $ を用いる方法が一般的ですが、正しくは \A と \z を用いる必要があります。Rubyの場合 ^ と $ を使って完全一致のバリデーションを行うと脆弱性が入りやすいワナとなります。PerlやPHPの場合は、Ruby程ではありませんが不具合が生じるので \A と \z を使うようにしましょう。 はじめに 大垣さんのブログエントリ「PHPer向け、Ruby/Railsの落とし穴」には、Rubyの落とし穴として、完全一致検索の指定として、正規表現の ^ と $ を指定する例が、Ruby on Rails Security Guideからの引用として紹介されています。以下の正規表現は、XSS対策として、httpスキームあるいはhttpsスキームのURLのみを許可する正規表現のつもりです。 /^https?:\/\/[^\n]+$/
chomp() は $/ に依存していると知れ！ - Islands in the byte stream
perldocにあるように、chomp()の挙動は $/ に依存します。ということは、うっかり local $/ したスコープで chomp() を行うと、何もおきません。 この結果起きる現象がきわめて不可解なので、readlineの直後以外の場面ではchomp()を使わず s/\r?\n\z//xms するのが無難でしょう*1。 use strict; use warnings; local $/; my $s = "Hello\n"; chomp $s; print "[$s]\n"; # => #[Hello #] Xslateがまさにこれにはまっていたので修正しました。 https://github.com/xslate/p5-Text-Xslate/commit/92c7387b0f0ebdad5761c420a54564b9e8d2f635 [追記] *1:はてブのコメントをう
[Perl] my と local と our の違いについて - 竹迫の近況報告
404 Blog Not Found:perl - myとourとscopeと みんな難しく考えすぎです。 （例外については後で考えることにして）とりあえず以下の基本をおさえておけば混乱することはないと思います。 ■ our 宣言について our はグローバル変数をスマートに使用するための宣言です。our は use vars と等価と考えてください。 our $var; は use vars qw($var); と等価。 our $var = 1; は use vars qw($var); $var = 1; と同じ動きをするもの、と覚えておけばOKです。それ以上の違いは基本的にないと考えて構いません。 ひとつ実用上の違いがあるとすれば、our は Perl 5.6 以降の built-in なのに対して、use vars は vars.pm の Perlスクリプトで実装されています。し
![[Perl] my と local と our の違いについて - 竹迫の近況報告](https://cdn-ak-scissors.b.st-hatena.com/image/square/e92af714c36668a34ee1fdf7dd8464828acfcc1d/height=288;version=1;width=512/https%3A%2F%2Fogimage.blog.st-hatena.com%2F8454420450103834818%2F17680117126987713958%2F1551691469)
かゆいところに手が届くマイナーCPANモジュールランキング - Articles Advent Calendar 2011 Casual
use strict; use warnings; print << 'PERL_ADVENT_CALENDAR_JAPAN_2011_DAY_7'; こんばんわ！こんばんわ！id:karupaneruraです！ Perl Advent Calendar Japan 2011の7日目を書かせて頂きます！お手柔らかに！ さてさて、みなさんCPANモジュール使ってますか？使ってますよね？僕は大好きです！ そんな、みんな大好きCPANモジュールの中から僕が独断と偏見で選ぶ、 『かゆいところに手が届くマイナーCPANモジュールランキング』を作ってみました！ 5位. Perl::MinimumVersion マイナー度 *** 使える度 **** 面白い度 **** 何番煎じ度 *** かっこいい度 **** これはPerlスクリプト、あるいはモジュールがどのバージョン以上で動作するかなどを調べるた
テキストファイルの全ての行をカンマで繋げるPerlワンライナー - ablog
私のお気に入り「テキストファイルの全ての行をカンマで繋げる sed スクリプト」: $ sed ':;N;s/\n/,/;b' 〇〇.txt (たった14文字だけで、他の言語の if文・while 文・文字列置換を表せるのだ) Twitter. It's what's happening. これは短い。 ちょっとやってみる。 % perl -e 'printf qq/%010d\n/,$_ for(1..10)' > hoge.txt % cat hoge.txt 0000000001 0000000002 0000000003 0000000004 0000000005 0000000006 0000000007 0000000008 0000000009 0000000010 % sed ':;N;s/\n/,/;b' hoge.txt 0000000001,0000000002,00
ハッシュをスカラーコンテキストで評価したものの正体。 - マツモブログ
正体のわからぬ物を発見。ある種UMAですUMA。 何かと言いますとid:hirataraさんのハッシュの判定は裸でを見てたら何か見慣れぬものを発見。 disp : 1/8↑ここ。 ちなみに $hoge{abc} = 'def'; printf("disp : %s\n", scalar(%hoge)); ↑この結果です。 気になって調べたら近藤嘉雪先生にぶつかりました。 http://www.context.co.jp/perlnews/bn/perl-newsletter-0008.html ◇ハッシュをスカラーコンテキストで評価する ハッシュをスカラーコンテキストで評価すると何が得られるでしょうか? 以前に説明しましたが、配列の場合はスカラーコンテキストで評価すると要素の個数が得られます。 このことから類推すると、ハッシュをスカラーコンテキストで評価すると、ハッシュの要素の個数が得られ
plenvを使ってみた. - Masteries
2013-01-21 plenvを使ってみた. @tokuhiromさんがplenvという, Perl 5のインストール管理ツールを開発されたそうです. ブログ記事やREADMEをまとめてみると, plenvの特徴は... Rubyのrbenvから影響を受けている. perlbrewと違って, プロダクトごとにperlのバージョンを指定することができる. とても高速で, インストールも簡単. perlbrewのような機能を持つが, 完全な上位互換ではない. ...という感じっぽい. こういう時はグダグダ言わずに入れて試してみるに限る, というわけでさっそく導入してみましょうー! インストール plenvを導入する為にはCPAN/brew/gitを使う方法がありますが, 今回はgitを使って入れてみます. ただ特徴にも書いてあるとおり, どの方法を使うにせよインストールはとても簡単です
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Perlゼミ(サンプルコードPerl入門)