Perlで電気ストーブを作る方法

[過去ﾛｸﾞ] Perlで電気ストーブを作る方法 (169ﾚｽ)
上下前次 1-新

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索歴削→次ｽﾚ栞削→次ｽﾚ過去ﾛｸﾞﾒﾆｭｰ

1(6): 名無しさん＠お腹いっぱい。 2009/02/01(日)22:35 ID:??? AAS
俺の調べによるとPerlという言語は元々電気ストーブの開発の為に
生み出された言語だというではないか。では、Perlでどのようなコードを
書いたら電気ストーブが作れるのか皆で考えようじゃないか。

70: 2013/04/05(金)20:20 ID:??? AAS
Perlじゃ無理だよ　遅いから・・・。

71: 2018/04/05(木)04:48 ID:HwISgAOU(1) AAS
超負荷をかけて無限ループ
　　　　　　　＆
CPUファン等の冷却装置をはずす。

ほっかほか。(*´д`*)ｱﾊｧ

72: 2018/04/05(木)05:10 ID:??? AAS
ファンがないと熱風出ないだろ。

73: 名無しさん＠Linuxザウルス 2018/04/05(木)20:17 ID:i3QZMTMG(1/3) AAS
まったくどいつもこいつも、それは「電気ストーブ」じゃなくて「ファンヒーター」だろ

74: 名無しさん 2018/04/05(木)20:21 ID:i3QZMTMG(2/3) AAS
電気ストーブ完成版
#!/Perl/bin/perl

print "Content-type: text/html", "\n\n";

@pairs = split(/&/,$ENV{'QUERY_STRING'});
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$QUERY{$name} = $value;
};
省13

75: 名無しさん 2018/04/05(木)20:22 ID:i3QZMTMG(3/3) AAS
電気ストーブ完成版
つづき
for (1..8){print "<td valign=\"top\" width=\"10\" height=\"20\"> </td>\n";
}
print "</tr><tr>\n";
for (1..8){print "<td valign=\"top\" width=\"10\" bgcolor=\"$heater\"> </td>\n";
}
print "</tr><tr>\n";
for (1..8){print "<td valign=\"top\" width=\"10\" height=\"20\"> </td>\n";
}
省3

76: 2022/04/05(火)03:25 ID:ZuxEnrYy(1) AAS
実際動くところを見せておくれ。
机上の空論になっとる。

77: 04/05(金)19:58 ID:KEV3OJXn(1) AAS
perl -e '`make stove`'

78: 04/05(金)22:38 ID:??? AAS
#!/Perl/bin/perl

while(1)
{
print "あったかほかほか\n";
}

#CPUから暖かい熱が出てきます。

79: 04/05(金)23:57 ID:zsGUscii(1) AAS
while(1) {
fork;
print("あっかたーい");
}

80: 04/05(土)01:47 ID:??? AAS
forkはちょっと違うような…

81: 2002/04/10(水)11:16 ID:??? AAS
電気ストーブ制御用のプロトコルつくって、
RFCに登録したら？
で、Perlでそれを実現するコーディングを。

82: 2011/05/01(日)05:35 ID:d1wYSRf9(1) AAS
3年・・・

83: 2014/05/01(木)14:20 ID:??? AAS
ああ、あれから3年経ったな。

84: 2013/05/03(金)18:46 ID:yV0EPN+6(1) AAS
そして２ヵ月後…

85: 2014/05/03(土)06:52 ID:??? AAS
3回目の冬もオワタな

86: 2016/05/03(火)12:46 ID:??? AAS
な、なんだこのスレは！激しくﾜﾛﾀよ

87: 2016/05/03(火)14:50 ID:??? AAS
electricstove://www.foobar.st/

88: 2005/10/03(月)00:54 ID:umVesKWU(1) AAS
Perlはプログラミング言語なのでどう頑張っても
電気ストーブの材料にはならないでしょう。
ただし、スレタイをよく読むと材料として使うと
は書いてありません。
電気ストーブの製造時にPerlを使ってもよいわけ
です。あるいはPerlという土地で電気ストーブを
作るというのも一案です。

そんなわけで私は地名の方を調べてきます...

89: 2005/10/03(月)01:46 ID:RYS/0is/(1) AAS
まだあったのかよ・・・

90: 2005/10/06(木)13:25 ID:Yi8E4LoQ(1) AAS
AtomAPI で操作できる電気ストーブにしたら便利じゃね？

91: 2005/10/06(木)13:29 ID:??? AAS
あぁ，あと RSS で室温，残り燃料を配信したら一部の人にとっては便利かもしれない．

来るべく冬に備えて，そろそろこのプロジェクト始動しないと．

92: 2005/10/06(木)19:26 ID:kKdAE9DW(1) AAS
Y

93: 2005/12/16(金)14:59 ID:??? AAS
ﾉノﾉﾉハヽヽ
リﾉ＞ヮ＜ﾘﾉ＜ｸｼｮﾝ!

94: 2005/12/16(金)15:00 ID:??? AAS
ﾉノﾉﾉハヽ
リﾉ‘ヮ‘ﾘﾉ

95: 2005/12/16(金)15:06 ID:??? AAS
ﾉノﾉﾉハヽ
リﾉ>ヮ<ﾘﾉ

96: 2005/12/18(日)01:58 ID:??? AAS
AA省

97: 2005/12/24(土)18:19 ID:??? AAS
AA省

98: 2005/12/24(土)18:21 ID:??? AAS
AA省

99: 2005/12/25(日)21:55 ID:??? AAS
○⌒＼
(二二二)
リﾉ‘ヮ‘ﾘﾉ

100: 2005/12/29(木)17:19 ID:??? AAS
AA省

101: 2006/01/06(金)19:03 ID:??? AAS
ﾉノﾉﾉハヽ　　
川`･_･´)||　
ノ/　/L
ノ￣ゝ　　　

102: 2006/01/07(土)11:40 ID:Yrk/+KPl(1) AAS
こたつをprintしよう

103: 2006/01/07(土)18:07 ID:??? AAS
仕事でperl使ってる手前、おかしくて仕方が無いｗ

104: 2006/01/07(土)18:20 ID:??? AAS
マルチスレッドで、それぞれにwhileループで円周率の計算をさせるとかどうよ。

105(1): 2006/01/08(日)21:08 ID:jjfaosB+(1) AAS
>>1
昔仕事で作ったやつだけど、どうぞ。

#!/usr/bin/perl

use strict;
use Jcode;
use danbou;

my $obj = danbou->new;

print "Content-type: text/html\n\n";
省6

106: 2006/01/12(木)13:41 ID:??? AAS
>>105
WebProg板だけに、サーバサイドスクリプトなのね。

107: 2006/01/26(木)10:56 ID:??? AAS
Perlを暴走させて、発熱させたＰＣをコタツにするのですか？

108: 2006/03/09(木)16:28 ID:Fd0dBP0K(1) AAS
プレスコットで電気ストーブを作ってみないか？

109: 2006/03/09(木)22:03 ID:??? AAS
発熱させるのはPCだからPCでストーブを作ったことになるのでは？

110: 2006/03/09(木)22:40 ID:??? AAS
Perlで負荷をかけてPCが発熱したら、やっぱりPerlじゃないかな？

111: 椎名 [進] 2006/11/02(木)22:12 ID:??? AAS
金の亡者

112: 2006/11/02(木)23:01 ID:??? AAS
PICマイコンつかえば応用が利く、総司令部はPerlから。
そういう発想はできないのか、おまえら

113: 2006/11/02(木)23:55 ID:??? AAS
PCで熱源になるのはCPUだけではない･･っ！
CPU・GPU・HDD等の各種ドライブ・電源・マザーボード･･･このご時世、殆ど全てのパーツが熱源に変わるのだ。

さぁ！これらのパーツを選りすぐって厳選し、ほっかほかのPCを作り上げるのだ！

CPU：最大消費電力100W以上の物を、可能なら2個搭載したい。
GPU：対応している物で最も高性能な物にしておけば特に問題はない。
HDD：RAID構成にしておくと大量の読み書きで負荷を高める際にプログラムが簡単になって後々楽。
電源：恐ろしい消費電力の為に何気に超重要パーツ。選ぶポイントはとにかく大容量。
ファン：高負荷状態でも安定動作させるために必須。空気の流れを考慮しつつ強力な物を沢山。

そして、絶対に忘れてはならない物がある。
・熱を封じ込める狭い空間の構築に欠かせない”コタツ台”！
省3

114: 2006/11/05(日)06:04 ID:9CpRBd2c(1) AAS
ワイルで無限ループもいいけどさぁ。
限界があることに気づこうよ。

115: 2006/11/05(日)06:05 ID:??? AAS
sage忘れた。sage

116: 2006/11/05(日)06:07 ID:??? AAS
>>16
あ？ヒアドキュメントでくくって文字列出力しただけじゃねーか。
粋がってんじゃねーぞド素人が！！

117(2): 2006/11/05(日)19:08 ID:??? AAS
#!/usr/local/bin/perl
$cgiurl = 'stove.cgi'
$stove_no = 'Stove_2ch';
$stove_id = 'attaka';
$stove_ps = 'pokopoko';
$stove_time = 10;
require './cgi-lib.pl';
use STOVE;
&decode;
&header;
省20

118: 2006/11/07(火)05:01 ID:LezWqaS7(1) AAS
真面目な話、while(1)なんかよりも
指数関数的に処理が増えていくやつの方が
即効性があるんじゃないのかと言おうとしてやめた。

119: 2006/11/07(火)05:39 ID:??? AAS
増やすためにwhile使うだろ

120: 2006/11/07(火)14:40 ID:??? AAS
TCP/IPは元々コヒーポット遠隔制御のために作られたプロトコルです

121: 2006/11/08(水)00:07 ID:??? AAS
コヒーポット？

122(1): 2006/11/24(金)11:41 ID:??? AAS
whileってワイルって読むのか・・・

123: 2006/11/25(土)14:10 ID:MAk3S3G9(1) AAS
>>122
まさかお前今までwhileのことをウィルとでも読んでたのか？

124: 2006/11/25(土)14:46 ID:??? AAS
段々と冬の気配が近づいてまいりました。
皆様、いかがお過ごしでしょうか。

125(1): 2006/12/01(金)14:52 ID:??? AAS
ホワイルって読んでた

126: 2006/12/01(金)19:13 ID:??? AAS
>>125
俺も俺も
単語は米英語発音です。。。

127: 2006/12/05(火)03:33 ID:??? AAS
誰かcpanに登録しろよ。

2ch::Stove

128: 2006/12/05(火)14:13 ID:??? AAS
先頭に数字は使えないだろ

129: 2007/06/17(日)11:18 ID:CcwzlC8Y(1) AAS
ニちゃん::ストーブ

130: 2007/06/18(月)00:08 ID:??? AAS
ここまで続いてると発狂したくなるな

131: 2007/07/04(水)22:14 ID:??? AAS
つ10 GOTO 10

132: 2007/08/24(金)09:48 ID:JWUhZcKL(1) AAS
このスレﾜﾛｽｗｗｗ

133: [age] 2007/11/29(木)10:20 ID:??? AAS
段々と冬の気配が近づいてまいりました。
皆様、いかがお過ごしでしょうか。

134: 2007/11/30(金)00:44 ID:??? AAS
6年目の冬･･･

135: 2008/01/28(月)21:08 ID:??? AAS
うー寒っ。
perlでストーブでも作るか。

136: 2008/02/15(金)21:44 ID:A0WXhOsP(1) AAS
perlで電気ストーブってどうやって作るんですか?

137: 2008/03/09(日)02:15 ID:??? AAS
Acme::ElectricStove

138: [?] 2008/06/06(金)09:18 ID:??? AAS
残念ながら今の先物価格だと灯油が120円は軽く超えます。
灯油がガソリン以上にかなり買い占めされています。
冬は１６０円相当にまでなってます。
石油を使わない電気ストーブまたはエアコンを考えてください

139: 2008/06/06(金)11:37 ID:BYonZ9Xz(1) AAS
っつかPerlでは電気ストーブ以外作ったことないすけど。。。

他に何かできるんすか？

140: [?] 2008/07/18(金)10:23 ID:??? AAS
灯油の値上がりが異常だから作ろうよ

141: [?] 2008/07/30(水)12:28 ID:??? AAS
おー

142: 2008/07/30(水)13:05 ID:Af+1KtEz(1) AAS
6年経つと言うのに未だに無限ループで発熱させる方法から進歩してなくてワロス

143: 2008/07/30(水)18:49 ID:??? AAS
ほかにどうしろと

144: [?] 2008/08/13(水)00:07 ID:??? AAS
Perlって何？

145: 2008/08/13(水)00:28 ID:??? AAS
金銀Perlのネックレスの頭文字をとったものです

146: [ｇｇ] 2008/09/04(木)14:24 ID:??? AAS
灯油使わないのはいいよね

147: 2008/09/05(金)23:00 ID:??? AAS
今年は油高ぇからなあ。氏にかねん。
Perlストーブ、alpha でいいからリリースしてくれ。

148(1): 2008/10/05(日)22:58 ID:??? AAS
ストーブがPerl製でも燃料は同じです。

149: 2008/11/07(金)16:42 ID:??? AAS
>>148
hackが足らない。

150: 2008/11/26(水)21:10 ID:GyupIWdq(1) AAS
6年越しの衝撃の事実に恐れおののくが良い
電気ストーブの英訳は"electric heater"
"electric stove"は調理器具

151: 2008/12/05(金)15:05 ID:tuYpMTRh(1) AAS
>>117
STOVE.pmってどこにあります？

152: 2008/12/14(日)11:49 ID:??? AAS
ヤマダ電機に売ってましたよ

153: 2009/03/07(土)17:07 ID:svmAHGib(1) AAS
ヤマダ行ってくる

154: 2009/03/09(月)14:05 ID:??? AAS
あー思いついた。
それほど負荷になるのかどうかは知らんが、
Perlで自分(CGI)自身にアクセスするCGI作って、それをwhileでループさせてみるとか。
そうすれば、多分延々自分にアクセスするかと。(タイムアウトとか無視した場合)

155: 2009/03/09(月)14:18 ID:??? AAS
こんな感じでどうだろ。

#!/usr/bin/perl
use LWP::UserAgent;
print "Content-Type: text/html\n\n";
$i = 0;
while (1) {
my $ua = LWP::UserAgent->new;
my $req = HTTP::Request->new(GET => "http://$ENV{SERVER_NAME}:$ENV{SERVER_PORT}$ENV{SCRIPT_NAME}");
my $res = $ua->request($req);
$i = $i + 1;
省2

156: 2009/04/01(水)11:52 ID:??? AAS
俺が自分用に作るなら、辛い料理の画像を表示しまくるだけで十分だな
辛い料理は見てるだけで汗が出てくる。

157: 2009/04/02(木)08:42 ID:??? AAS
じゃエロ画像でもｒｙ

158: 2010/04/23(金)09:39 ID:SlKc4drv(1) AAS
このスレまだあったのか！
最後の書き込みから、1年以上経ってるしｗ

159: 2010/04/27(火)01:31 ID:??? AAS
はっきり言って、Perlはすでに冷たくなっているんだが...

160: 2010/04/27(火)01:58 ID:??? AAS
>>117
うはｗｗｗ　まだあったんかこれ
昔書いたコードがｗｗｗくそショボイｗｗｗｗ

161: 2010/05/12(水)22:58 ID:L029Fmu7(1) AAS
いまさらなにいてんだ！おまえらのうちにあるストーブはみんなPerlで動いてるんだよ。温度調整から耐震制御まで全部Perlなんだよ！

162: 2010/05/13(木)22:39 ID:??? AAS
真珠のネックレスもPerlなんだよ！

163: 2010/06/09(水)01:50 ID:D52jLZq7(1) AAS
理論的には作れる！間違いない。
でも内部のコードだけねPerlで作り利点は今の所ない。

164: 2012/07/04(水)08:23 ID:??? AAS
捕手

165: 2013/03/09(土)20:32 ID:??? AAS
おう

166: 2014/08/08(金)23:16 ID:??? AAS
エラー：灯油が切れています！

167: 2017/01/21(土)18:57 ID:iuL6ICc7(1) AAS
ぬるぽ

168: 2017/12/30(土)15:53 ID:YhlYw6jg(1) AAS
誰でも簡単にネットで稼げる方法など
参考までに、
⇒　『半藤のブブイウイウレレ』というサイトで見ることができます。

グーグル検索⇒『半藤のブブイウイウレレ』

IJOVM998Z5

169: 2018/09/21(金)23:04 ID:??? AAS
多分買ってきたほうが早い

上下前次 1-新書関写板覧索設栞歴

ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 0.180s*