■ [perl][memo]DATAを開くとデバッグがだるい
use autobox::dump;
use YAML;
print Load(do { local $/; <DATA>; })->perl;
sleep 100;
exit;
みたいな処理を書くとsleepしてる間ソースファイルがreadonlyになって不便。
追記
開き直さないんだったら閉じたらいい。
print Load(do { local $/; $a = <DATA>; close DATA; $a; })->perl;