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