Perlコーディング初心 ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このスレッドのURL
■項目テキスト
10:nobodyさん 07/09/16 23:09:56 >8 再現しない。再現する最小コードは? use strict; use warnings; use bignum; my @array; $array[99] = 0; print scalar(@array), "\n"; # 100 my $tr = (@array * (1-0.68)/2); print "$tr\n"; # 16 11:nobodyさん 07/09/16 23:24:10 >>10 #!/usr/bin/perl #京 #use bignum; my @array; for (1..100){ push @array,$_ } @array = sort {$a<=>$b} @array; my $tr = (@array * (1-0.68)/2); print $tr; これでできると思います。EUCコードで記述されています。 use bignum;をコメントアウトするかしないかで表示が変わります。 本来とは違う挙動をしているのでしょうか? 12:nobodyさん 07/09/16 23:35:36 普通にprintしていたものを、突如ファイルに納めたくなりました。 print 1; というのが何千行もあった場合 print FH 1; とやりなおすのは間に色々な式が挟まってる為一括ではできません。 標準出力先をファイルハンドルに変える設定などが冒頭でできるなら一発でできると思うのですが。
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック!
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4910日前に更新/271 KB
担当:undef