Perlについての質問箱 59箱目

1 名前：デフォルトの名無しさん [2013/07/23(火) 13:56:30.61 ] そんなもん人に質問するな 全部自分で調べろゴミクズ ttp://toro.2ch.net/test/read.cgi/tech/1362841481/ テンプレは↑の2-7 199 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 00:28:37.33 ] つくづくPerlって糞言語だなと再認識したわ 200 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 00:29:25.07 ] >>198 お前が一番屑だ馬鹿 201 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 00:30:18.52 ] >文法上、出力内容と出力先を区別できるようにしたいし、しかも出力先を >省略できるようにしたいから 何でこれに突っ込まないんだ？ 仕組みとそういう仕組みに至った理由がごっちゃになってて説明になってないが。 202 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 00:31:45.51 ] >>197 sub my_print { @a = $_[0]; @b = $_[1]; print "a: @a"; print "b: @b"; } my_print "a" "hoge", "hoge"; String found where operator expected at test.pl line 10, near ""a" "hoge"" (Missing operator before "hoge"?) となってしまいました。 203 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 01:05:18.60 ] >>202 これはただの釣りじゃない 質問してるヴァカがPerlの基本的な仕様を知っているかどうかのテスト 知っていれば読んだだけで分かる ここは基礎もまともにできてないヴァカにマンツーマンで教えるスレか？ 204 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 01:14:26.94 ] 知っていれば読んだだけで分かる＝俺が知っているとは限らない 205 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 01:30:38.12 ] マンツーマンって、気に入らなきゃ無視すればいいだけなのに 何言ってんだか 206 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 01:50:21.39 ] マンツーマンは知らんけど>>202の低脳っぷりはヤバいｗｗｗ深刻なエラーが起きるようなコードも平気でコピペするんだろうｗｗｗｗｗ 207 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 02:21:19.76 ] >>199 だよな なんせデフォルトでswitchも使えないんだからな 産廃扱いされても文句は言えない 208 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 06:47:53.97 ] use strict付けても型チェックがほとんど行われないのはマジでゴミ以下、こんな言語使う奴は頭が腐ってる。 209 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 09:48:17.43 ] そもそもuse strictがあること自体おかしい。 今は付けることが推奨されてるけど、 付けるとモジュールなどによっては不具合が起きる場合があるから必須ではない。 最初からそういう前提で作らなかったのが問題。 学習コストや開発効率以前に設計そのものに欠陥がある言語の典型。 産廃未満のカス。 210 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 11:00:09.49 ] >>209 ＞モジュールなどによっては不具合が起きる場合がある たとえば？ 具体例を挙げてみてよ 211 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 11:07:24.78 ] PHPが出現した時点でPerlがオワコンなのは確定してた 老害がリヨウモクテキガー、パールスラツカイコナセイバカガーをやってなんとかここまでもたせたけどもう限界 212 名前：デフォルトの名無しさん [2013/08/09(金) 13:17:01.88 ] evalで例外をキャッチするとき、use diagnosticsが無効になるけど これ有効にしたままにはどうしたらいいの？ 213 名前：デフォルトの名無しさん [2013/08/09(金) 13:41:26.97 ] evalで例外キャッチするようにプログラムを書くと、 -cオプションでの構文チェックが効かないのな。 これは面倒だ。 みんなどうやって回避してんの？ 214 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 14:17:45.25 ] Perlを使うのをやめる 215 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 14:19:16.12 ] 質問者から言語にターゲットを変更したの？ 216 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 15:56:29.00 ] PHPはWeb用途では高性能スポーツカーかも知れんが、所詮それだけの（用途限定の）存在。 多目的実用車のPerlと優劣を云々すること自体、無意味でありガキの発想。 217 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 16:17:20.35 ] >>211みたいなヨダレ垂らした低脳に使ってもらわなくても Perlは生き残るから無問題 218 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 16:49:26.27 ] >>212 お前みたいな一人では何もできない奴ってどこから湧いて出るんだろうな。 219 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 17:07:45.81 ] >>218 Perlから逃げ出して遠くから煽ってるだけの奴よりはマシだろ 220 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 17:16:44.78 ] $scalarは\$scalar、@aryは\@aryとすれば参照を得られますが 関数の返り値を参照にする記述法はありませんか？ 具体的には my ($a, $b) = map {my @tmp = split('<>', $_); \@tmp} @_; というコードから@tmpを消したいのですが my ($a, $b) = map {\split('<>', $_)} @_; では動きませんでした。 221 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 17:21:28.63 ] my ($a, $b) = map {[split('<>', $_)]} @_; 222 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 17:24:26.90 ] >>221 な、なるほど、無名配列の定義の中で返り値を展開させるのですね。 ありがとうございました。 223 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 17:50:14.59 ] >>222 いいから二度と来るなよ。 224 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 17:56:05.15 ] 配列ではなくハッシュを引数で受け取る場合についての質問です 配列を引数に取る場合はザメの話題が最近ないのですが 最近はどのようなつぶやきをしているのでしょうか？ よろしくお願いします 225 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 21:25:14.83 ] >>222 >>222 >>222 >>222 >>222 226 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 23:10:41.04 ] 次スレのテンプレに追加予定。 # 30年後の日付を取得する方法 my($year,$month,$day) = (localtime)[5,4,3]; my $after30years = sprintf('%04d-%02d-%02d',1900+$year+30,$month+1,$day); # 1000日後の日付を取得する方法 my($year,$month,$day) = (localtime(time+1000*24*60*60))[5,4,3]; my $after30years = sprintf('%04d-%02d-%02d',1900+$year,$month+1,$day); Time::Pieceを使う別解は↓ 227 名前：デフォルトの名無しさん mailto:sage [2013/08/09(金) 23:13:00.24 ] s/\$after30years/$after1000days/ if $count++; 228 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 03:41:33.11 ] 自己顕示欲の塊だな 229 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 07:49:54.94 ] 出ました「自己顕示欲」 230 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 09:06:34.32 ] 「30年後の日付取得をテンプレに入れろ」って、、 そんなもん入れるくらいだったら PERL5OPTの設定とか 他に入れるもんあるわ、、、 たぶん、（1000日後とか）勉強してやり方が判ったから、 嬉しくて書き込んだんだろうけど、自己顕示以外の何物でもない 231 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 09:34:44.75 ] ついでだから。 >>210 % export PERL5OPT='-Mstrict -Mwarnings' % corelist Time::Piece Global symbol "$running_under_some_shell" requires explicit package name at /PATH/TO/bin/corelist line 3. BEGIN not safe after errors--compilation aborted at /PATH/TO/bin/corelist line 125. % export PERL5OPT='-Mwarnings' % corelist Time::Piece Name "main::running_under_some_shell" used only once: possible typo at /PATH/TO/bin/corelist line 3. Time::Piece was first released with perl v5.9.5 #1. corelist = core module のうちの一つ #2. $running_under_some_shellによるエラーはwin環境だと出ません。だったっけ 232 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 10:47:16.85 ] 同じ質問⇒同じ回答（レス消費） 233 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 13:34:14.61 ] >>231 恥ずかしくないの？ 234 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 13:48:53.35 ] >>233 言葉尻掴まえたんだろうけど、恥かしい奴だなあ、お前。 235 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 14:15:06.10 ] >>234←基地害 Perl厨ってこういう基地害しかいない印象。 236 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 14:19:14.02 ] 欠陥だらけの糞言語perlを有り難がって使うのなんて基地害しかいないからだろ 237 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 14:25:37.36 ] >>236 だが、Perlすらロクに使えないお前とは天と地の開きがある 238 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 14:32:55.80 ] Perlすらとか言ってる老害いるけど一貫性のない産廃に「すら」って付けて何が言いたいんだろうな 「うんこすらロクに食べられない」って言ってのと同じだから、「すら」って付いてても逆にハードル高いし、それを超えたところで一般社会ではアホ扱いされるだけ 一部のマニアの間ではヒーローなのかもなｗ 239 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 15:30:28.01 ] >>238 一貫性で飯が食えるか小学生 240 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 15:53:50.14 ] use strict推奨とか言って付けるとエラーが出ることもあるゴミ言語perl。 phpも大概糞だけどそれでもperlよりは幾分かマシ。 241 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 16:04:25.66 ] まぁPerlが糞かどうかはともかく >>234みたいな人間が使う言語だってのは事実ｗｗｗｗｗｗＰＢＩｗｗｗｗｗｗｗｗ 242 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 16:29:29.11 ] >241 >234はPerl使いじゃなくてPerl使いのフリしたネガキャンだよ。 お前のような情弱にPerlの悪い印象を植え付けるためのな。 243 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 20:00:56.72 ] Time::Pieceを使う別解(レス節約) # 30年後の日付を取得する方法 use Time::Piece; my($year,$month,$day) = (localtime)[5,4,3]; my $after30years = sprintf('%04d-%02d-%02d',1900+$year+30,$month+1,$day); # 1000日後の日付を取得する方法 use Time::Piece; my($year,$month,$day) = (localtime(time+1000*24*60*60))[5,4,3]; my $after1000days = sprintf('%04d-%02d-%02d',1900+$year,$month+1,$day); 244 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 20:04:00.64 ] >>243 お前がリアルでもウザがられてるのはそういうところだよ。 245 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 20:17:57.39 ] 「ぼく1レスにまとめたよ！すごいでしょ！」 人格形成の段階で誉められないとこういう人間ができることが多いから 恐らく親がＤＱＮでまともに教育しなかったんだろう だからどこで何をすれば他者の承認を得られるか知らないんだよな それでこういう不特定多数の人間の目につくところでゴミ書き込みをする 246 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 21:36:19.28 ] >>243 お前が回線切ればレスだけでなく色々節約になる。 247 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 22:38:15.64 ] 何年後、何日後ってところに具体的な数値を当てはめてる辺り プログラマの素質ゼロのゴミクズだとは思う 素質がわずかでもあればY年後、D日後で利用可能な汎用コードを書くからね このレス見てから慌てて修正するんだろうけど遅すぎ 頭の悪い奴は救いようがないって良い例 248 名前：デフォルトの名無しさん mailto:sage [2013/08/10(土) 23:05:09.10 ] 素質は生まれたときから進化も退化もしないそうです そう信じないと生きていけないならもう何も言うまい 249 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 01:23:54.12 ] プログラムで飯食ってる方々は罵倒しなきゃやってられないほど大変そうで 250 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 01:25:19.99 ] >>247 具体的な値でも修正前の1発目なら大目にみれる。 修正版であれだから頭弱すぎ。 251 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 09:54:19.13 ] time()なんかに足し算したら32ビットなPerlで2038年問題になるんじゃね？ｗ 252 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 13:17:30.47 ] それ以前に年に%04dを使ってるあたり、10000年以降を考慮してないよな 253 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 14:20:50.98 ] 10000年どころか2038年までもPerlは残ってないからどうでもいい こんな産廃が後20年以上残ってると本気で思ってるのか 254 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 14:34:02.97 ] 「産廃」と「ゴミ」しかボキャブラリのない無能煽り師は 2038年まで生き残れないことは確かだな 255 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 14:38:24.96 ] 自己紹介乙ｗ 256 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 14:51:55.01 ] どうせ自分のメモ代わりに使いたかっただけだろ>>243は。 ブログと2chの区別すらつかなくなってるんだろうな。 こういう判断力のかけらもない奴は実社会でもかなりウザがられてるんだけど 自覚はあるのかね。 257 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 15:33:34.23 ] わざわざ煽りにだけ来るやつの方がうざいから 258 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 15:42:15.97 ] うざいだけならまだしも>>243の場合は存在が迷惑 259 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 16:30:48.71 ] >>255 それは「何も言い返せない時の悔し紛れ」だってことぐらい 煽り師なら知ってるんだろうな？ 260 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 16:39:49.27 ] ・「何も言い返せない時の悔し紛れ」だってことを既成事実化 ・煽り師というレッテル貼り 二つの手法を組み合わせた攻撃 さすが本物の荒らしは色んな武器持ってるな 261 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 17:04:43.29 ] N88BASIC使いたいがエミュレーション探さなきゃいけない面倒さよ 262 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 17:08:06.29 ] >>260 つまらん 却下 263 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 17:23:52.87 ] 素人にエンターテイメント性を求めてるキチガイがいるときいて 264 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 17:30:27.61 ] >>262のほうがつまらない。 面白いと思ったんだろうか。 265 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 18:24:06.95 ] >>264 負け惜しみは意味なし 却下 266 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 19:37:35.73 ] いっそお互いボクシングで決着つけたら？ 267 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 20:54:32.37 ] 雑魚同士のボクシング 268 名前：デフォルトの名無しさん mailto:sage [2013/08/11(日) 21:31:58.37 ] 意見が対立してるならまだしも>>265みたいに煽りにきてる人にボクシングさせてもどうしようもないだろ つーかいつまで粘着するんだろうな、もう1年くらいになるんじゃね？ 269 名前：デフォルトの名無しさん mailto:sage [2013/08/12(月) 13:11:40.09 ] 性格のにじみ出た醜い顔してんだろうな 270 名前：デフォルトの名無しさん mailto:sage [2013/08/12(月) 13:21:56.87 ] 自分がいつまで粘着を続けるつもりでいるか、もはや自分自身でもわからない状態ということか 271 名前：デフォルトの名無しさん mailto:sage [2013/08/12(月) 15:49:59.82 ] >>269 鏡見た感想はブログに書いたほうがいいよ。

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef