Perlコーディング初心 ..

---

[2ch|▼Menu]

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
617:nobodyさん 08/05/29 03:05:45 mapがいまいち理解し切れなくて使ってないんだが覚えとくべき？ 覚えると便利そうだけど。 618:nobodyさん 08/05/29 03:45:40 やってることは、forやforeachと変わらん。 違うっていえば、{}の中を、引数リストのそれぞれの要素で実行した結果をリストとして返すってとこか。 かなり便利な局面もある。覚えとくべきだとは思う。 @res　=　map{　$_　+　10　}　(1,2,3,4,5)　; print　join("\n",@res); ---結果--- 11 12 13 14 15 619: ◆TWARamEjuA 08/05/29 07:02:31 my $Now_Date = sprintf qq|%04d/%02d/%02d %02d:%02d|, map { $_->[0] += 1900; $_->[1]++; @$_; }[(localtime)[5,4,3,2,1]]; 2008/05/28 07:02 って出るかと思う。 620:nobodyさん 08/05/29 08:23:18 >>617 シュワルツ変換という定番sort手法には必須だよ。 ぐぐって、foreach 文で書いてみたらありがたみが分ると思う。 >>619 お前さんの例は頻繁にとんでもなく斜め上を行くなあw なんで一要素しかないと分りきってる無名配列を作って map の例にする？ do ならいざしらず perl -le 'my $Now_Date = sprintf qq|%04d/%02d/%02d %02d:%02d|, do{ @_ = (localtime )[5,4,3,2,1] ; $_[0] += 1900 ; $_[1] ++ ; @_ } ; print $Now_Date ;' それ以前に普通は↑こんな面倒な事しないだろ？ perl -MPOSIX=strftime -le '$str =strftime "%Y/%m/%d %H:%M", localtime; print $str, "\n"; '

---

次ページ

最新レス表示

スレッドの検索

類似スレ一覧

話題のニュース

おまかせリスト

▼オプションを表示

レスジャンプ

mixiチェック！

Twitterに投稿

オプション

しおりを挟む

スレッドに書込

スレッドの一覧

暇つぶし2ch

---

4955日前に更新/211 KB
担当:undef