Perlについての質問箱 39箱目at TECHPerlについての質問箱 39箱目 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト200:190 09/03/01 19:41:26 open ">$file"; ならファイルが作成できるんですが、 open ">$file.txt"にするとだめでした 事前に$file .= ".txt"; で文字結合してもだめでした 201:デフォルトの名無しさん 09/03/01 19:48:27 file="テスト"なんだよね? ソースファイルのエンコーディングは何? もしSJISでなければSJISにしてみては? 202:デフォルトの名無しさん 09/03/01 19:49:52 ってSJISって書いてあった。すまん 203:190 09/03/01 19:53:45 ソースファイルのエンコーディングはSJISです open ">テスト.txt";はできます 末尾に.txtを文字結合すると書き込めなくなるようです 204:190 09/03/01 20:00:43 Dumpしてみたら原因がわかりました 改行コードを含んでいたようです スレ汚し失礼しました 205:デフォルトの名無しさん 09/03/01 22:41:48 BE:1417729695-2BP(192) Perrrrrrrrrrrrrrrrrrrrrrrrrrrrnrrrrrrl 206:デフォルトの名無しさん 09/03/03 13:58:07 オブジェクト指向の勉強中なんだが… my(%ch, $i); $i = 0; sub new{ my($pkg, $data) = @_; $ch{$i} = $data; my $self = {obj_num => $i ++}; return bless $self, $pkg; } sub DESTROY{ delete $ch{$_->{obj_num}}; } カプセル化ってこんな感じでいいの? 自分で動かした感じは問題なさそうだけど普通のオブジェクトとアクセサしか使えないだけで同じ動作する? 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch