- 1 名前：デフォルトの名無しさん mailto:sage [2008/08/11(月) 19:10:40 ]
- "The duct tape of the Internet" こと、Perlについての質問箱です。
"There's more than one way to do it" ということで、
Perlの奥深さについて皆で語り合い、追求してまいりましょう。
CGIについての質問は板違いです。WEBプログラミング板でどうぞ。
CGIとPerlの区別がつかない人もWEBプログラミング板に行ってください。
( WEBプログラミング板 pc11.2ch.net/php/ )
CGIの質問は答えが Perlと全然関係ない話に帰着する場合が
多かったりするのでWEBプログラミング板に行って聞いたほうが得ですよ。
このスレでは(CGI以外の)純粋にPerlのみに関係する質問を取り扱っていこうと思います。
スレ違いの質問にはスルーか、速やかな誘導をお願いします。
www.perl.org/get.html
● 2008/08/11 現在の最新版（安定版）: 5.10.0
● 2008/08/11 現在の開発版: 5.9.5
▼ 前スレ
Perlについての質問箱 36箱目
pc11.2ch.net/test/read.cgi/tech/1215569470/
リンク集は>>2-3
Perl 日本語処理の基礎の基礎 >>4
過去スレは>>5-6 あたり
- 136 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 00:05:14 ]
- >>128
やってみた。
かんたんだった。
use Win32::Sound;
Win32::Sound::Volume('100%');
Win32::Sound::Play("file.wav");
Win32::Sound::Stop();
↑これを書くだけで、できた。
Win32::Soundは最初から入っていた。
- 137 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 00:26:36 ]
- Win32::MIDIって使い方がよくわからんな。
midiを鳴らすときは、必ずWin32::MIDIでないとだめなの？
それとも、midiもWin32::Soundでいけるの？
- 138 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 00:54:45 ]
- perlでmidiファイルを鳴らす方法がまじでわからんわ。
midiファイルを指定して、すぐに鳴らすとかできないのかな？
- 139 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 01:00:59 ]
- >>134
順序が逆だっちゃ。
大量のドキュメントに対して grep などによる全文検索だけでは不便だから perldoc のセクション特定用の各オプションがある。
- 140 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 02:04:19 ]
- >>139
> 順序が逆だっちゃ。
これは順番の問題ではない。不便な全文検索が問題なら不便でない全文検索が
求められるだけのこと。
- 141 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 02:38:01 ]
- ま、いずれにせよ、「それを欲しい者がそれを作る」のが基本だべさ。
- 142 名前：103 mailto:sage [2008/08/18(月) 04:34:08 ]
- >>140
全文検索自体が不便つーことでなく、単純な全文検索だとどこからでもパターンを拾ってきちゃうから、-f だの -q だのがあんだべ、って話。
パターンがどのファイルのどこにあるか知るだけなら find, grep で特に不便もないし、それ用の Perl スクリプトを書いても2分てとこだろ。
- 143 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 04:37:30 ]
- >>142
> パターンがどのファイルのどこにあるか知るだけなら
そんなのじゃ不便過ぎるだろ。
- 144 名前：デフォルトの名無しさん [2008/08/18(月) 07:43:42 ]
- 不便に思ったことないんだがどんな使い方がしたいんだ？
まさか初めてのPerlすら持ってない奴の戯れ言じゃないだろうな……
- 145 名前：デフォルトの名無しさん [2008/08/18(月) 07:49:29 ]
- 子供はHSPでも使ってろ
HSPには可変長配列は無いがな！！（まさに外道）
- 146 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 12:55:44 ]
- アセンブリを外道と言うな。
- 147 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 15:27:11 ]
- 夏だなあ
- 148 名前：デフォルトの名無しさん [2008/08/18(月) 15:43:15 ]
- 確実にここではないと思うのですが、どこなのか分からなくてスミマセン。
perl書くときに $ とか %#"'() など良く打つと思いますがshift押さずに入れるように
するようなソフトや方法はありますでしょうか？
数字はテンキーがあるのでキーボードの1～9の範囲は全部記号にしたいのですが。
- 149 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 16:39:16 ]
- >>134
もう数年前になるけど、大学の研究室に、Perl関係のドキュメントを
インクリメンタルに全文検索でひけるソフトがあった。
Rubyで書かれていたけどw
- 150 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 17:10:00 ]
- active perlでのforkについてです
子プロセスの上限を決めてforkで処理するのに、
pidをpushしていって、上限を超えたらいちばん古い子プロセスをwaitpidしていますが、
たまたまそいつが遅いと他のプロセスはとっくに終わってるのに先頭のを待ち続ける、
というはめになります
pidのリストのうち、どれか一つ終わったら、という処理をさせるには
どうすればいいですか
- 151 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 17:31:18 ]
- >>150 $SIG{CHLD} じゃダメ?
- 152 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 17:31:28 ]
- >>150
っ[Parrallel::ForkManager]
- 153 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 17:51:40 ]
- >>148
スキャンコードをリマップすることにより可能。
方法は OS 等により異なる。使用 OS の板・スレで聞くといい。
- 154 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 18:05:26 ]
- ㌧
勉強してみます
- 155 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 18:05:41 ]
- 154=150
- 156 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 18:41:09 ]
- WAVEを鳴らすのは、カンタンにできたんだけど、
midを鳴らす方法がわからない。
MP3については、mediaplayerなんとか、っていうモジュールを
使えばいいみたいなんだけど、ppmでダウンロードのリストに入ってない。
- 157 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 18:43:28 ]
- 数字をランダムジェネレートして、
アルファベットの小文字と大文字
a-z,A-Zにchrを使って変換して表示する
プログラムを作ろうと思ったんだけど、
65-120だと、まんなかに、余計な記号が入ってしまう。
この場合、if 95<x<98 then redo
でいいのかな？
もし記号の数字だったら、ルーレットをまわした結果を
破棄して、もう一度ルーレットをまわすって言う。
- 158 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 18:45:00 ]
- ようは、randで、65-95、かつ95-120の数字がほしい、
って指定できればいいんだけど、できないんだよね。
他の言語だとできるの？
- 159 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 18:46:09 ]
- >>158
まちがえた。
○ようは、randで、65-95、かつ98-120の数字がほしい、
- 160 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 19:19:20 ]
- >>157 発想を変えてみる
@str = (a..z,A..Z);
print $str[rand(@str)];
- 161 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 20:25:45 ]
- >>160
なんもプリントされないんだけど。
- 162 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 21:08:40 ]
- こうですか？
$x = int(rand(52));
print chr(($x + ($x % 2) * 63+ 130)/2);
- 163 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 21:17:41 ]
-
my $a;
do {
$a=int(rand(123-65)) +65;
say "fault!";
} while ($a<=96 or $a>=91);
print $a;
↑これやると無限ループになる。なんで？
- 164 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 21:20:53 ]
- >>163
自己解決した。
orじゃなくてandだった。
こんな難しいバグも一人でデバッグできるオレ様の単価は
120万円/月くらいですか？
- 165 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 21:29:18 ]
- my $a;
my $b;
for ($b=1;$b<=8;$b=$b+1){
do {
$a=int(rand(123-65)) +65;
} while ($a<=96 and $a>=91);
print chr($a)," ";
}
↑やったーパスワード発生器できたよー
- 166 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 21:34:31 ]
- system q|cls|;
my $a;
my $b;
for ($b=1;$b<=8;$b=$b+1){
do {
$a=int(rand(123-65)) +65;
} while ($a<=96 and $a>=91);
sleep(0.5);
print chr($a)," ";
}
print "\n";
↑こっちのほうが、ちょっとかっこいいかな？
- 167 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 21:46:46 ]
- 今、考えてるのは、
配列に、３つの要素が入ってるとして、
その３つの要素を連結して、一つの文字列にして、
スカラー変数にいれるということ。
@a=('a','b','c')
だとして、
$b="abc"
にしたいということ。
自分で考えるから、おまいら、絶対に正答を書くなよ！
いいか、絶対に書くなよ！
- 168 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 21:50:53 ]
- sub genpass {
my @chars = (0..9, "A".."Z", "a".."z");
join "", map { $chars[rand(@chars)] } 1..8;
}
print genpass(), "\n";
- 169 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 21:55:05 ]
- >>168
こ、これは、、、
スカウターの数字が、、、
パールレベル１２を超えてるだと？！
- 170 名前：デフォルトの名無しさん mailto:sage [2008/08/18(月) 22:01:36 ]
- これ以上このスレに常駐するなら、あぼーんするからコテつけてくれ。
- 171 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 00:11:06 ]
- use feature qw( :5.10 );
use Time::HiRes 'sleep';
$|=1;
#----------------------------------
system q|cls|;
my $a,$b,@c,$e;
for ($e=1;$e<=5;$e=$e+1){ #外側のforループ
for ($b=1;$b<=3;$b=$b+1){ #内側noforループ
do {
$a=int(rand(123-65)) +65;
} while ($a<=96 and $a>=91); #do-while文
push(@c, chr($a));#生成したランダム文字を配列にプッシュ
}
my $d;
$d=join ("",@c);#配列に格納されている文字をスカラー変数に代入
say "$d";#文字を出力
@c=();#配列を初期化
}
#----------------------------------------
↑やったー
ランダムな3連文字列を5回出力することに成功
あとはソート部分のロジックだけだー
- 172 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 00:14:45 ]
- >>168
実を言うと、
＞print genpass()
ここがわからなかったりする。
無名サブルーチンの呼び出し？
サブルーチンを呼び出して、その返り値を
プリントしている？
- 173 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 00:22:56 ]
- randの引数に、配列を入れるってのは、ありなのか？
- 174 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 00:25:31 ]
- ありだよ。
- 175 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 00:25:54 ]
- レベル低い質問ばっかりだな
- 176 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 00:26:48 ]
- >>175
妬むなよ！
- 177 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 00:27:05 ]
- レベル低い煽りばっかりだな
- 178 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 00:28:28 ]
- そりゃ、初心者の廚が常駐してんだもん、
レベルの高い質問になるわきゃねえ。
まあ、夏休みが終るまでの我慢我慢。
- 179 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 00:44:47 ]
- 夏休みであって欲しいとか小中学生であって欲しいとは思う。
- 180 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 01:03:15 ]
- >>168
見ればみるほどすごいわ
天才だろこれ
- 181 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 01:53:07 ]
- >>180
grepやmapは暗黙的なloopを構成できるので、
馴れればすぐにそれっぽく書けるようになるよ。
- 182 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 01:56:59 ]
- さーせん、xmlの変更処理で、簡単で短いコードを教えてください。
検索処理ではなく、変更処理っす、文字列でなく、xml文章として扱って変更するタイプ。
入力xmlは、標準入力かファイル名、出力するxmlは標準出力
処理前xml
<xml? ....ありきたり>
<root:yesroot>
<!-- subtree -->
<subt e='befoore' />
</root:yesroot>
変更後xml
<xml? ....ありきたり>
<root:yesroot>
<!-- subtree -->
<subt ele='after' />
</root:yesroot>
自分で作るにあたって参考にしたサイトは、
www.ibm.com/developerworks/jp/xml/library/x-xmlperl1.html( 1 - 3)
なんですが、どうも簡単。ってレベルじゃないと”感じ”ました。
javac,c,python,rubyでやっても同じじゃん。みたいな。
- 183 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 02:11:33 ]
- >>181
みっともないやつだな
- 184 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 02:59:31 ]
- >>182
> 検索処理ではなく、変更処理っす、文字列でなく、xml文章として扱って変更するタイプ。
Perl は入力をほとんど常にバイト列として扱います。
XML として扱いたいなら XML::* モジュール郡を使ってください。
> javac,c,python,rubyでやっても同じじゃん。みたいな。
そういうことなら Perl にこだわる必要もないのでは?
- 185 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 10:54:11 ]
- CGIレベルでなくて、純粋なコンソールレベルの
perlの入門書を探しているんだが、あんまりないね。
結城さんのは読んだし、すぐわかるperlは今読んでるし。
- 186 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 14:08:22 ]
- Perl初めて塾 やさしいPerl ［表計算的処理編］
ミニマルPerl
Perlクックブック Volume 1
等々あるけど、べつに結城本でもテキスト処理はカバーしてるよ。
CGIも処理の大半はテキスト処理だし
- 187 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 14:19:56 ]
- 何でこんな変な文字列になるのですか？
$a = "\Q声";
print $a # => \申ｺ
- 188 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 14:24:45 ]
- \Q ... \E は英数字以外の文字にバックスラッシュを追加する
- 189 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 14:37:28 ]
- >>188
そうなんだ
サンクス
- 190 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 17:11:25 ]
- >>172
ヒント：
sub hogehoge(){
'Hello World!!';
}
print hogehoge(); #Hello World!!
- 191 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 19:53:40 ]
- >>190
なにか、名前はついてるんですか？
「サブルーチンの、無宣言呼び出し」とか。
名前がわからないと、本で調べることもできないし。
たぶん、このサブルーチンの呼び出し方は
入門書レベルでは解説ないですよね？
＆をつけて呼ぶ方法しかのってないのが普通だと思う。
- 192 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 20:09:01 ]
- 本が古いだけなんじゃ
- 193 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 20:31:06 ]
- ラクダ本だと「裸のワード」ってよばれてる。
$, @, & とかなくてクォーテーションで囲まれてない文字列をどう解釈するか。
@list = (hoge, hage);
print $list[1];
とかね。
- 194 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 20:41:57 ]
- >>191
>＆をつけて呼ぶ方法しかのってないのが普通だと思う。
…いつの時代の人ですか？
- 195 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 21:02:35 ]
- …誰も突っ込まんから一応突っ込むが、
>>168はごくごく普通のサブルーチン
>>190はプロトタイプ付きのサブルーチン（引数を取らないと宣言している）
本人は解ってて書いてるのかも知れんが、
sub hoge(){
my $dat = shift ;
…
}
とかやる奴が出てきそうで怖い
ってここまで書いて初心者スレじゃない事を思い出した。ご丁寧に書く必要なかったな
- 196 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 21:30:42 ]
- 初心者スレとかあるの？
- 197 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 22:03:03 ]
- webprogにあるよ
- 198 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 22:46:49 ]
- >>195
微妙に難しいな。
いや解説してくれたのはありがたいんだけど。
プロトタイプってレベル２だろ。
- 199 名前：デフォルトの名無しさん mailto:sage [2008/08/19(火) 23:16:23 ]
- あっち池。
Perlコーディング初心者質問スレ Part 58
ttp://pc11.2ch.net/test/read.cgi/php/1218030872/
くだすれPerl（超初心者用）2
ttp://pc11.2ch.net/test/read.cgi/php/1204488452/
- 200 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 00:14:27 ]
- >>199
一時期そちら方面でもお見かけしたのですけれど、
どうも、その…、回答者の質がお気に召さないご様子でして、
大変光栄なことに、数を撃てばなにがしかの情報が引き出せて、
かつ適度に遊んでもらえるこちらに居を定められた模様なのですよ。
個人的に殿下には、同じあちらでも下記スレをおすすめ申し上げたい。
pc11.2ch.net/test/read.cgi/php/1158647441/l50
- 201 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 00:39:07 ]
- 何度同じサイクルを回れば気が済むんだよ、チンポしゃぶりどもが。
- 202 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 00:54:32 ]
- おまえもな
- 203 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 01:09:57 ]
- おまえもな
- 204 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 01:17:11 ]
- おれらもな
- 205 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 01:17:56 ]
- おまえだけだよ
- 206 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 01:24:36 ]
- いやいやおまえもだろ
- 207 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 02:58:59 ]
- もういいです
- 208 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 14:06:12 ]
- いやいやよくない
- 209 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 15:22:53 ]
- こういうのははっきりさせとかないとな
- 210 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 20:06:37 ]
- 正規表現って、
s///と、
tr///と、
m///と、
3つの種類しかないの？
- 211 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 20:13:12 ]
- つ split(//)
別にこれらが正規表現な訳では無い
これらのパターンマッチ関数で正規表現を使用しているという事
- 212 名前：デフォルトの名無しさん [2008/08/20(水) 20:38:24 ]
- 質問age
hoge.plは処理の中でlocaltimeを取得するんですが、hoge.pl自体の改修はせずに
実行時にlocaltimeを指定してやることは可能でしょうか？
別のhogehoge.plを作って、その中で指定した値をlocaltimeとしてhoge.plに渡して実行
みたいなことができるとベストなんですが。
- 213 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 22:30:23 ]
- 意味不明
- 214 名前：デフォルトの名無しさん mailto:sage [2008/08/20(水) 23:05:42 ]
- >>212
が言いたいのは、たぶん、
hogehoge.plの中味で、
$a=123456;
とかを指定。
そんで、
localtime=$a;
とかにする。そんで、
hoge.plを実行するときに、引数で渡す。
perl hoge.pl localtimeとか。
そしたら、hoge.plが、引数として渡された
localtimeを食って、localtimeとして実行する。
こんなイメージだと思う。違ってたら言って。
- 215 名前：212 mailto:sage [2008/08/21(木) 00:00:51 ]
- >>214
すいません、ちょっと違います。
hoge.plは純粋にlocaltimeを取得するだけで
引数をlocaltimeとして扱うという機能はありません。
例えば、実行するとそのときの時刻をテキストに書き込む、といった感じです。
実行したときの実際の時刻とは違う時刻を取得させたいのですが
hoge.pl自体を改修せずに実現できないものかと考えております。
- 216 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 00:28:35 ]
- 最初から、そのhoge.plが、
引数を食うような設計になってないと、
無理なんじゃないかな。
- 217 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 00:33:33 ]
- ビルトイン関数をユーザ定義関数で置き換えることって出来なかったっけ？
- 218 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 01:13:12 ]
- # hogehoge.pl
chomp( my $the_world = `time /t` );
my $you_want = '00:00';
system( 'time', $you_want ) and die;
system( 'perl', '.\\hoge.pl' ) and die;
system( 'time', $the_world ) and die;
# そんなことやってると、もっと恐ろしいものの片鱗を味わうことになる。
# 今のうちにやめとけ。俺は止めたからな。
- 219 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 01:50:57 ]
- ビルトイン関数のオーバーライドはできるよ
- 220 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 02:25:11 ]
- localtime($hogehoge::hogetime) とか hogehoge::hogetime() にするのが本当に無理な状況なら
権限がないので書き換えられないと書いてそうなんだけどな。
- 221 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 13:06:25 ]
- www.nicovideo.jp/watch/sm2744352
これってperlでもできるのかな？
- 222 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 17:19:21 ]
- ああ
- 223 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 18:22:30 ]
- Q.「～はPerlでも可能ですか?」
A.「できます」
ほとんどの "～" について上記の答が返ってきます。
"～" が「電気ストーブの作成」である場合等、いくつかの例外を除いて。
- 224 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 18:28:57 ]
- >>221
電気ストーブ作りたいならここ参考にね☆
pc11.2ch.net/test/read.cgi/php/1010583350/
- 225 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 22:11:55 ]
- なんか質問の趣旨が誤解されてるようですが、
perlで同じ物作れるか？って質問でなくて、
perlでソースコード組むときに、このシステム使って
ネット経由でペアプログラミングしたりとか、
自分のコーディングを録画して中継したりとか
できるのかな？って意味だったのですが。
- 226 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 22:15:18 ]
- うむ
- 227 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 22:15:21 ]
- ああ
- 228 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 22:36:43 ]
- kazato.run.buttobi.net/cgi-bin/material/src/vm002_0183.png
perl版のこういうの作らない？
while
文字列の長さを取得する ループを作る
みたいなの
- 229 名前：デフォルトの名無しさん mailto:sage [2008/08/21(木) 22:37:33 ]
- >>226
ちょっとperlでソースコード書いて、
>>221のシステムでうぷしてもらえませんか？
- 230 名前：デフォルトの名無しさん mailto:sage [2008/08/22(金) 04:29:53 ]
- >>228
作っていいぞ。
>>229
うｐっていいぞ。
- 231 名前：デフォルトの名無しさん mailto:sage [2008/08/22(金) 10:20:37 ]
- ばかなんじゃないの
- 232 名前：デフォルトの名無しさん mailto:sage [2008/08/22(金) 14:42:37 ]
- おまえもな
- 233 名前：デフォルトの名無しさん mailto:sage [2008/08/22(金) 15:14:57 ]
- おまえもな
- 234 名前：デフォルトの名無しさん mailto:sage [2008/08/22(金) 15:17:41 ]
- ∧＿∧ ／￣￣￣￣￣
（ ´∀｀）＜ オマエモナー
（ ） ＼＿＿＿＿＿
｜ ｜ |
（＿_）＿）
- 235 名前：デフォルトの名無しさん mailto:sage [2008/08/22(金) 15:55:27 ]
- 言い出しっぺの法則。
自分が欲しいものは自分で作れ。
- 236 名前：デフォルトの名無しさん mailto:sage [2008/08/22(金) 16:35:25 ]
- >>235
言い出しっぺの法則は、「言い出しっぺがやらない限り誰もやらない」だ。
|
 |
