【Perl 】初心者コーナーPart8

このエントリーをはてなブックマークに追加
952名無しさん@お腹いっぱい。:01/12/27 02:01 ID:K1xvVgg1
foreach(0..10){
などで0〜10まで順に実行している時
0〜10の値は何に格納されているのですか?
http://tohoho.wakusei.ne.jp/wwwperl1.htm#Tokushu
ここを見たのですが、乗って無いみたいなので。。。
お願いします。
953952:01/12/27 02:06 ID:K1xvVgg1
ちょっと質問違いました!
foreach(@array){
てした時に何回目なのかを格納する変数を教えて下さい。でした。
951だと$_
てなっちゃいますね。すいません。
954んとねんとね:01/12/27 02:22 ID:???
ない、いじょ
955名無しさん@お腹いっぱい。:01/12/27 02:27 ID:K1xvVgg1
無いのですか!?
これだけいろいろな特殊変数があるのに!意外だ…。
ではforeach(@array){
$tmp++;

とやって数えるしかないのですね。。。なるほど。
即レス感謝です。
ありがとうございました。
956かもかも:01/12/27 04:31 ID:GPy3eH+b
@a= qw(1 5 2);
for ( $[ .. $[+$#a ){
print "id= $_, value= $a[$_]\n";
}
957名無しさん@お腹いっぱい。:01/12/27 05:20 ID:06m3pfEi
>>956
なるほど〜。変数では無いですけど、
そういう方法もありますね。
# $[+$#a
# ここでなんで$[を足すのかがまだわからんですけど
レスどうもです。
958かもかも:01/12/27 05:26 ID:STachx1U
配列のインデックスを0からとか1から始めるとかを設定するのが$[変数
なのでR!
959名無しさん@お腹いっぱい。:01/12/27 05:40 ID:???
かもかも、カコイイ♥
960名無しさん@お腹いっぱい。:01/12/27 09:06 ID:???
$count++; して数えとけ。
961そろそろ次スレを・・・:01/12/27 09:38 ID:???
$[って今は使われて無い(というか、使うなと言われている)変数だから、この場合は素直に 0..$#aでも良いと思うが・・・
962名無しさん@お腹いっぱい。:01/12/27 10:23 ID:???
>>957
$[ は足さなくてよい。ていうか、足しちゃだめ。
$#aで、$[ をバイアスとする@aの最後の添え字の意味になる。
perldoc perldataでは、以下のように説明されている

     scalar(@whatever) == $#whatever - $[ + 1;

>>958
デフォルトの$[ == 0だから動いただけ。
  local $[ = 1;
を965の先頭に入れて動かしてみ。

てことで、>>958新スレよろしく!
963えいじ:01/12/27 19:20 ID:VRi8wtO1
open(OUT,+>filename.txt);
print OUT "あいうえお\n";
close(OUT);

でfilename.txtが新規作成されるんですけど
http://www.****.com/ のトップのディレクトリだけは
新規作成されません。
どうしたら解決できるかご存知の方おられますでしょうか。
よろしくお願いいたします
964名無しさん@お腹いっぱい。:01/12/27 19:51 ID:???
open(OUT,+>filename.txt)||die("$!");
にしてエラーを見てみ
965名無しさん@お腹いっぱい。:01/12/27 19:54 ID:???
wwwのドキュメントルートと鯖のルートの違いを判ってないに1票
966名無しさん@お腹いっぱい。:01/12/27 19:54 ID:???
つーかこの馬鹿スレ立てやがった  (呆
967名無しさん@お腹いっぱい。:01/12/27 20:16 ID:???
>>965
同意します。
968名無しさん@お腹いっぱい。:01/12/27 20:22 ID:???
>>965

なんだ。そういう勘違いをしていたのか。
969名無しさん@お腹いっぱい。:01/12/27 20:26 ID:???
ドキュメントルートってなんですか? とか質問するに一票。
970名無しさん@お腹いっぱい。:01/12/28 01:03 ID:???
マルチ無視
わざわざAA張って煽る事すらウザイ
971名無しさん@お腹いっぱい。:01/12/28 04:07 ID:OJh+njZn
IPってダイヤルアップで再接続すると微妙に変わるものですよね?
再接続しても同一ユーザーだと特定する方法ってないんですか?
972名無しさん@お腹いっぱい。:01/12/28 04:12 ID:???
IPは何回繋いでもVersion4だろ w
973名無しさん@お腹いっぱい。:01/12/28 04:18 ID:???
>>971
パソコン初心者板で聞いてみて。http://pc.2ch.net/pcqa/index.html
974名無しさん@お腹いっぱい。:01/12/28 05:07 ID:???
>>972
おいそれは屁理屈に近いだろ。このくらい教えてやれよ。
975名無しさん@お腹いっぱい。:01/12/28 06:33 ID:???
>方法ってないんですか?
有るよ
976有るなら:01/12/28 14:25 ID:???
教えれ
977プッ返し  げら:01/12/28 14:30 ID:???
↑ (´,_ゝ`)プッ (´,_ゝ`)プッ (´,_ゝ`)プッ
978名無しさん@お腹いっぱい。:01/12/28 15:17 ID:???
先生!画像アップロード掲示板でmidファイルを使用したいのですが
どうしてもうまく改造できません..。
よければアドバイス願いします。
979名無しさん@お腹いっぱい。:01/12/28 15:27 ID:???
>>971

そのこととPerlとどんな関係があるんだ?
980名無しさん@お腹いっぱい。:01/12/28 15:29 ID:???
>>978

if($filename=~m/\.mid$/)
print "Content-Type:audio/midi";
981980:01/12/28 15:30 ID:???
Perlは実行文がひとつでも{と}で囲まなければならなかったかな?
982980:01/12/28 15:31 ID:???
一応こっちで

if($filename=~m/\.mid$/){print "Content-Type:audio/midi\n\n";}
983978:01/12/28 16:12 ID:???
>>980
先生!ありがとうございます!!
ある、画像アップロード掲示板を使用しているのですが
それはイメージ(GIFやJPEG)画像しかうpできないんです。
それじゃーとりあえず982の記述を適当に書き込んだら良いのでしょうか?
984982:01/12/28 17:06 ID:???
そういえば、出力するときはCGIは通さないか・・・・

>>983
コードを見ればどこかに受け入れ可能な拡張子を判断するところがあるだろ?
そこに.midを付け加えればOK
985984:01/12/28 17:09 ID:???
>>983

982の記述は必要ないです。
9861000:01/12/28 21:18 ID:???
1000
987sage:01/12/28 22:53 ID:???
sage
988sage:01/12/28 22:53 ID:???
sage
989sage:01/12/28 22:53 ID:???
sage
990sage:01/12/28 22:53 ID:???
sage
991sage:01/12/28 22:53 ID:???
sage
992sage:01/12/28 22:53 ID:???
sage
993sage:01/12/28 22:53 ID:???
sage
994sage:01/12/28 22:53 ID:???
sage
995sage:01/12/28 22:53 ID:???
sage
996sage:01/12/28 22:53 ID:???
sage
997sage:01/12/28 22:53 ID:???
sage
998sage:01/12/28 22:53 ID:???
sage
999sage:01/12/28 22:53 ID:???
sage
1000sage:01/12/28 22:53 ID:???
sage
10011001
このスレッドは1000を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。