この記事は abicky.net の 初めて Perl でコードを書く時に知っておきたかったこと に移行しました
変数は以下のように値を代入したり出力することができます。 # 変数に文字列を代入 $value = "テストです"; # 変数を出力 print $value; 【参照ページ】 変数 配列 複数の値を1つの変数で管理したい場合は、『配列』という変数が最適です。 配列を初期化する場合は、要素をカッコで囲み、各要素毎にカンマで区切ります。 @week = ('日曜', '月曜', '火曜', '水曜', '木曜', '金曜', '土曜'); 配列はインデックスを使って参照します。インデックスは 0から始まるので注意してください。たとえば1番目のデータ "日曜" を呼び出すときは、$week[0]、"月曜"なら $week[1] とします。 # 配列 @week の1番目の要素を表示 print $week[0], "\n"; > 日曜 # 配列 @week の2番目の要素を表示 print $
デフォルトのファイルハンドル(多くの場合STDOUT)のバッファをflush(バッファを強制出力)するのは$| = 1;として、print "";すればいいのだが、現在デフォルトのファイルハンドルとは違うファイルハンドルをflushしたい場合、select($file_handle);としてから$| = 1としなければならない。$|は元々何だったかも覚えておかないといけない。selectする前のファイルハンドルも元に戻さないといけない。実はいろいろすることがある。そのために取っておいた変数は掃除しないといけない。とするとコードはこうなる。 { my $old_fh = select($fh); my $old_dolcol = $|; $| = 1; print ""; $| = $old_dolcol; select($old_fh); } これを1行でかくとこうなる。
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く