Testでファイルをアプリケーションと分離して自前で読み込みたかったので調べてみた。下のようにperl6:Slurpとか使わずに関数を定義しているみたい。 sub slurp { my $path = shift; croak qq{Can't open file "$path": $!} unless open my $file, '<', $pat…