Perlコーディング初心者質問スレ Part 56

Perlコーディング初心者質問スレ Part 56at PHP

Perlコーディング初心者質問スレ Part 56 - 暇つぶし2ch■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

400:nobodyさん
 07/10/20 00:37:33 Ja84SJeF
Location ではtargetが指定できませんが、呼び出したときの 
属性は生きるってどこかに書いてありました 
どういうことでしょう 
 
ssiのhtmlファイルの中に書いた、iframeのCGIまたは#exec cgiで 
クッキー認証できなかったら全画面を再認証画面に飛ばしたいのですが、 
やはり無理でしょうか？

401:nobodyさん
 07/10/20 05:18:19 VLTga6QI
print <<EOM; 
<a href="hoge.html">hoge</a> 
EOM 
 
と、 
 
print "<a href=\"hoge.html\">hoge</a>\n"; 
 
ではどちらの方が実行速度が速いですか？

402:nobodyさん
 07/10/20 06:50:46 
>>401 
ほぼ同じ。 
http://boobar.hp.infoseek.co.jp/bench/print.txt

403:nobodyさん
 07/10/20 07:40:43 VLTga6QI
>>402さん、ありがとうございます。 
大変参考になりました。

404:nobodyさん
 07/10/20 07:47:37 x+Q9ulv4
おはようございます。 
以下のスクリプトについて質問です。 
outフォルダ内の.txtファイル全てに対して 
ある作業をするというスクリプトなんですが、 
ファイルオープンのところでそんなファイルはないから 
開けないというエラーが出力されます。 
 
例：hoge.txtがある場合 
OPEN ./out/hoge.txt file: No such file or directory at check line 22. 
 
どこが間違ってるか教えてください。お願いします。 
OSはWindowsXPです。 
 
my @directories_to_search = ('./out/');　#対象のフォルダ 
find(\&wanted, @directories_to_search);  
sub wanted{ 
 my $filePath = $File::Find::name; 
 my $find = index( $filePath, ".txt" ); #.txtを対象 
 unless ($find >= 0) { 
  return 1; 
 } 
 open FH_READ, "<$filePath" 
  or die "OPEN $filePath file: $!"; 
              #ある作業をする。 
 close FH_READ; 
}

次ページ