Hatena::Groupperl

local $PERL_MEMO;

July 12, 2013

[][]DATAを開くとデバッグがだるい

use autobox::dump;
use YAML;
print Load(do { local $/; <DATA>; })->perl;
sleep 100;
exit;
__DATA__
---
foo: hoge
bar: fuga
baz: piyo

みたいな処理を書くとsleepしてる間ソースファイルがreadonlyになって不便。

追記

開き直さないんだったら閉じたらいい。

print Load(do { local $/; $a = <DATA>; close DATA; $a; })->perl;

ゲスト



トラックバック - http://perl.g.hatena.ne.jp/Cormorant/20130712