- 1 名前：デフォルトの名無しさん [2012/01/18(水) 02:58:16.13 ]
- CGI についての質問は板違いです。WEB プログラミング板でどうぞ。
CGI と Perl の区別がつかない人も WEB プログラミング板に行ってください。
(WEB プログラミング板: hibari.2ch.net/php/ )
このスレでは(CGI 以外の)純粋にPerlのみに関係する質問を取り扱っていこうと思います。
スレ違いの質問にはスルーか、速やかな誘導をお願いします。
"The duct tape of the Internet" こと、Perl についての質問箱です。
"There's more than one way to do it" ということで、
Perl の奥深さについて皆で語り合い、追求してまいりましょう。
www.perl.org/get.html
● 2011/10/30 現在の最新版: 5.14.2
▼ 前スレ
Perlについての質問箱 49箱目
toro.2ch.net/test/read.cgi/tech/1319953460/
リンク集は >>2-3辺り
Perl 日本語処理の基礎の基礎 >>4辺り
- 331 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 01:23:43.64 ]
- 309です。
こんな池沼しかいない底辺スレで質問した私が馬鹿でした。
二度ときません。
- 332 名前：325 [2012/02/02(木) 01:35:56.94 ]
- >>328
解決策は提示しただろうがクズ。
>>325を100回読みなおせ精神異常。
- 333 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 01:40:41.96 ]
- ニートの分際で生意気だな
- 334 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 02:20:50.61 ]
- 解決策とその理由をきちんと順序立てて提示するとなると
ちょっとした本一冊書ける量になる予感
- 335 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 03:26:58.47 ]
- Padreを使ってみた。コマンドプロンプトで入力すればいい。
オプションでExternalなんとかをオフってると詰むけど。
- 336 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 03:46:48.54 ]
- エスパーすると、PerlIOとhtmlタグを混同しとるんじゃなかろうか。
<STDIN>使えば<form><input type="text"></form>が出力されると勘違いしてる節がある。
どっちも角括弧使うし。
- 337 名前：デフォルトの名無しさん [2012/02/02(木) 04:32:05.42 ]
- 嬉しそうにスレ違いな書き込みをしてる社会不適合にエスパーは不要
- 338 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 06:01:52.06 ]
- まぁそうカリカリせず。
板違いはその通りなんだけど、どうして勘違いしちゃうのかは興味ある。
分からない方にとっちゃどう聞いていいかも分からんわけで。
自分の納品物がこんな風に動かねーってクレーム入れられた場合どう誘導するのが一番かな。
IO::Interactiveあたり噛ましてエラー吐かせて説明するとか？
- 339 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 07:00:14.59 ]
- >>338
雑談スレ 4
toro.2ch.net/test/read.cgi/tech/1302223650/
ネットワークプログラミング雑談
toro.2ch.net/test/read.cgi/tech/1235800707/
【総合】 Webprog板質問雑談スレッド 1
kohada.2ch.net/test/read.cgi/php/1131016915/
ｺﾚｶﾗWebProgｵ勉強ｼﾖｳﾄｼﾃﾙ香具師ｶﾞ雑談ｽﾙｽﾚ
kohada.2ch.net/test/read.cgi/php/1049476765/
- 340 名前：デフォルトの名無しさん [2012/02/02(木) 12:54:16.59 ]
- 連想配列のkeyの名前は文字数制限や使えない文字はあるんですか？
ファイルパスをkeyにしたいんですけど好ましくないんでしょうか？
$file_path="./log/bbs_name/test.dat";
$FILE_LOCK_FLG{$file_path}=1;というようにです
- 341 名前：デフォルトの名無しさん [2012/02/02(木) 13:13:33.29 ]
- それで何か問題あったの？
- 342 名前：デフォルトの名無しさん [2012/02/02(木) 13:39:55.23 ]
- うるさいゴミ
- 343 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:40:32.30 ]
- 連想配列のkeyの名前は文字数制限や使えない文字はあるんですか？
- 344 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:41:51.30 ]
- >>340
ttp://perldoc.jp/docs/perl/5.10.0/perldata.pod
見る限り「ハッシュキーに使える文字の制限」の記述はなかったので大丈夫だと思われ
- 345 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:42:38.12 ]
- そりゃあるだろうよ。
100兆文字使えるわけないだろ。
常識で考えろ池沼。
- 346 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:44:44.80 ]
- >>345
そんな頭の悪い発言で先生面するのはやめなさい
- 347 名前：デフォルトの名無しさん [2012/02/02(木) 13:45:17.95 ]
- そしてフォルダ名からkeyにマルチバイト文字が混入し、バグに苦しむ低脳(>>340)であった
- 348 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:46:38.13 ]
- なにいってんだこいつ(AAry
- 349 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:47:18.71 ]
- 趣味グラマだけどPerlが好きで、今更だけどラクダ本買って今読んでるんだけど
冒頭にラリーの言葉でPerlのコミュニティは素晴らしいって書いてあったんだよね。
それで穏やかな気持ちになってさ、2chのPerlスレはどうなんだろって覗いてみたんだがお前らカリカリしすぎﾜﾛﾀ
- 350 名前：デフォルトの名無しさん [2012/02/02(木) 13:49:18.63 ]
- カリカリしてるのは煽りたいだけの糞以下ゴミクズ基地害１匹だけ、マジで消えろよ
- 351 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:52:23.42 ]
- >>350
自己紹介乙。
カリカリしてるって笑われてるぞｗ
こんな時間から書き込みしてるとか余程程度の低いニートなんだろうな。
お前生きてる価値あんの？ｗ
- 352 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:52:51.43 ]
- >>350
俺にはキミが一番カリカリしてるように見える。
とりあえずもちつけ。
- 353 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:52:51.74 ]
- >>349
もうぶっちゃけるけど、Perlに限らずム板マ板にまともなプログラマはいないよ。
みんなブログやTwitterあるいはGithubで情報発信や交流している。
名無しさんにうずもれて満足して、ここにしか居場所がないようになると
それだけ新しいプログラミングの習得が遅れる。
このスレで書かれてるコードが10年前基準のレガシーなものだらけなの見ても分かるでしょう？
- 354 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 13:55:14.63 ]
- またレガシー厨か
- 355 名前：デフォルトの名無しさん [2012/02/02(木) 13:56:55.33 ]
- そうだな、俺も基本的に情報交換はTwitterだわ。
2chは惰性でチェックしてる。
- 356 名前：デフォルトの名無しさん [2012/02/02(木) 15:11:21.74 ]
- >>340
文字数制限は
自分で調べろバーカ
- 357 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 15:14:20.58 ]
- >>356によってこのスレの存在意義は完全否定されました
今までPerl質問スレをご利用頂き、ありがとうございました
- 358 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 15:16:11.02 ]
- だから今こうやって調べてるんじゃないですか。
- 359 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 15:23:10.58 ]
- 最近レスの流れが早いな
- 360 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 15:45:46.55 ]
- >>340
perlgutsでは、キーの長さはU32になってるから、
短くても32bitで表現できるバイト長は保障される(コンパイルされた環境に依存)だと思う。
use Config qw(config_vars);
print config_vars('u32size');
- 361 名前：デフォルトの名無しさん [2012/02/02(木) 17:50:11.77 ]
- プログラマーって根暗で穏やかじゃない人が多いですね
このスレ見て思った
- 362 名前：デフォルトの名無しさん [2012/02/02(木) 17:57:06.32 ]
- >>361
ここはいつからお前の感想掲示板になったんだ？
ブログにでも書いてろ真性基地害
- 363 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 17:59:41.62 ]
- おやおや威勢のいいお兄さんだ
- 364 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 18:09:31.55 ]
- >>361
で？
根が明るいだけしかとりえのないプログラムスキル皆無のゴミが何の用？
- 365 名前：345 mailto:sage [2012/02/02(木) 18:12:56.25 ]
- >>360
ほらな、だから100兆文字は無理だって言ったんだよ
考えればすぐ分かるだろ
- 366 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 18:14:29.13 ]
- >>362
じゃあここは何のスレなのかな？
質問しに来た人に対しちゃんと答えるスキルはあるけどあえて教えずネチネチいじめるスレなのかな？
- 367 名前：デフォルトの名無しさん [2012/02/02(木) 18:14:51.41 ]
- >>361
自己紹介は自己紹介板でやれや板違い
- 368 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 18:20:02.08 ]
- 自分は根暗でもなく穏やかだと思ってるイケヌマン(>>361)がいるときいて
韓国の首都上海からテポドンに乗って飛んできました！
- 369 名前：デフォルトの名無しさん [2012/02/02(木) 18:22:15.52 ]
- >>361
下手な釣りでも大漁で良かったなｗ
- 370 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 18:32:51.50 ]
- どう見ても自演です
寂しいのかな
- 371 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 19:10:41.33 ]
- >>349
ここはPerlのコミュニティじゃなくて2chだから。
- 372 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 19:13:11.92 ]
- 荒らすのだけが目的の奴がまぎれてるからなあ。
前はコテハンもどきを使っててあぼーんしやすかったんだけど
最近使わなくなったのか別の奴が流入してきたのか
紛らわしくていかん。
- 373 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 21:01:26.52 ]
- >>372=荒らすだけが目的の奴
- 374 名前：デフォルトの名無しさん [2012/02/02(木) 21:11:44.51 ]
- どうせPHP厨かレガシー厨だろ。
PHP厨はPerlが存在する限り日の目を見ることはないからな。
- 375 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 21:19:30.42 ]
- キーについて質問してるヴァカがいるけどどうせ何一つ調べずに質問してるんだろうなキモい
- 376 名前：デフォルトの名無しさん [2012/02/02(木) 21:49:34.23 ]
- >>361は自演だったのか
恥ずかしいなおいｗ
- 377 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 22:02:22.60 ]
- activeperlをwindowsで使っています
ms-dosの8.3形式の短いファイル名の一覧を取得する方法はありますか
- 378 名前：デフォルトの名無しさん [2012/02/02(木) 22:07:37.89 ]
- 全一覧取得→性器表現
- 379 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 22:26:48.32 ]
- >>377
Win32::GetShortPathName()
search.cpan.org/dist/Win32/Win32.pm
- 380 名前：379 mailto:sage [2012/02/02(木) 22:29:16.51 ]
- 補足。
support.microsoft.com/kb/405539/ja
- 381 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 22:55:05.58 ]
- >>377
採用されそうにないが
D:\hoge\fuga の一覧
my @filename_8_3 = grep {/\S+ +\S+ (\S+) +\S+/, $_ =$1} qx'dir /x D:\hoge\fuga';
- 382 名前：デフォルトの名無しさん mailto:sage [2012/02/02(木) 23:08:23.66 ]
- ㌧
ばっちり動きました
- 383 名前：デフォルトの名無しさん mailto:sage [2012/02/03(金) 00:54:51.78 ]
- >>320
レンタルサーバーがDELLのノートPCでWinXPをインストールしてあるんですか？
ところでインストールしてあるPerlのバージョンはいくつですか？
ちなみに
perl -v
でバージョンを調べられますよ。
- 384 名前：デフォルトの名無しさん [2012/02/03(金) 01:06:10.78 ]
- >>320
文章からしてそのレベルでは無理
お前はもっと低級な言語でもやって標準I/Oなんかを学習するべき
- 385 名前：デフォルトの名無しさん mailto:sage [2012/02/03(金) 01:11:34.15 ]
- あと<STDIN>が使えない段階でPadreを使うのは早いですよ。
本質的でないところではまってしまい、前に進みません。
また分からないことがあったら遠慮なく聞いてください。
- 386 名前：デフォルトの名無しさん mailto:sage [2012/02/03(金) 02:47:06.11 ]
- Padreはゴミ
Perlという言語ではゴミしか作れないだろうけど。
- 387 名前：デフォルトの名無しさん mailto:sage [2012/02/03(金) 02:51:13.22 ]
- 使い捨てに向いた言語って、結構な褒め言葉じゃね？
- 388 名前：デフォルトの名無しさん [2012/02/03(金) 03:03:11.29 ]
- ＰＨＰ厨様こんな夜中まで書き込みご苦労様です＾＾
Ｐｅｒｌはゴミしか作れませんが、ゴミすら作れず時間が失われるだけのＰＨＰよりはマシですね＾＾
- 389 名前：デフォルトの名無しさん mailto:sage [2012/02/03(金) 03:06:54.70 ]
- ほら、嫉妬してる奴が釣れちゃっただろｗ
- 390 名前：デフォルトの名無しさん mailto:sage [2012/02/03(金) 03:15:03.86 ]
- 猫に小判
豚に真珠
PHP厨にPerl
- 391 名前：デフォルトの名無しさん mailto:sage [2012/02/03(金) 03:23:47.79 ]
- 効いてる効いてる
- 392 名前：デフォルトの名無しさん [2012/02/03(金) 15:24:03.30 ]
- ス テ マ の 予 感
- 393 名前：デフォルトの名無しさん [2012/02/03(金) 21:54:38.24 ]
- PHP厨にPerl
- 394 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 00:24:37.03 ]
- CAPTCHAの認証を破るモジュールとかないよね・・・
無理かな
- 395 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 00:28:30.15 ]
- ぼくの考えた最強の
PHPeruby
- 396 名前：デフォルトの名無しさん [2012/02/04(土) 00:36:47.06 ]
- モジュールとして公開されてたら誰でも破れるだろボンクラ
誰でも破れるものをわざわざ手間かけて実装する低脳がどこにいるんだよパーかおめ
- 397 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 00:37:53.32 ]
- だよな
諦めるっきゃないか
- 398 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 00:45:12.94 ]
- モジュールですべてを行おうとするから出来ないんであって、
文字を判読して打ち込むところを人間にしてもらうように
作ればいんじゃね？ただし人間というのは当然、自分以外のっ
てことだけど。エッツな画像とかをえさにすれば、入力して
くれるひともいるでしょ。
- 399 名前：デフォルトの名無しさん [2012/02/04(土) 00:45:28.75 ]
- お前が高脳で諦めずにそういうモジュールを完成させても
公開すれば間もなくみんなCAPTCHAやめて別の方法とると思うぞｗ
そこまで高い的中率を求めるのでなければ自作もできるんじゃない？
画像認識の話になるからそれ系の話を探せば出てくるかもな。
- 400 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 00:48:52.22 ]
- エロ画像ダウンロード画面でCAPTCHAと入力窓出して、入力されたら裏で認証するとか？
確かにそれだとバレないな。
- 401 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 01:07:55.48 ]
- Perl使いにはハードルの高いものだな
- 402 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 01:11:22.73 ]
- CAPTCHA認証は100%不可能。超むずい
- 403 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 01:13:37.43 ]
- 作るほうはたくさんモジュールあるんだけどなｗ
- 404 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 01:16:32.05 ]
- JDownloader
- 405 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 08:15:03.85 ]
- Perlとは違うがCAPTCHA破りならPWNtchaとかあるにはある
caca.zoy.org/wiki/PWNtcha
ロシアや中国あたりでは人海戦術でCAPTCHAを破る専門の仕事があるらしいが……
- 406 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 10:41:21.75 ]
- >>399
>公開すれば間もなくみんなCAPTCHAやめて別の方法とると思うぞｗ
それはそのとおりだと思うけど、>>394の要件に含まれていないからいいよ。
- 407 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 10:48:29.60 ]
- 手動はメンドイな
本当なんつーものを開発してくれたんだよ
- 408 名前：デフォルトの名無しさん [2012/02/04(土) 10:49:20.61 ]
- 最近は犬と猫の色んな写真を8枚くらい表示して
犬の画像を全部選択しろとかもあるな
CAPTHAの次はこれが標準になるだろう
俺の予想ではその次は全部同じ生き物の写真になると思う
例えば全部人間で、商談してる写真やら野球してる写真やら絵を描いてる写真が10枚程表示されて
「スポーツをしてる画像を全部選べ」みたいな
さらにその次は馬鹿撃退用に知識を問う画像が表示されるだろうな
アンコールワットやマチュピチュなんかの写真が12枚程表示されて
「世界遺産を全部選べ」みたいな
画像からググるのはほぼ不可能に近いから一般常識のない馬鹿は撃退される
それを突破しようと思ったら人工知能レベルのモジュールが必要
今から作っとけ
- 409 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 10:49:27.86 ]
- たった100兆文字くらい、京なら余裕でしょ。
ちょっと昼休みに試してみるわ。
- 410 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 10:50:26.60 ]
- >>408
ぐあああ
不可能だ
- 411 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 10:51:09.72 ]
- 日本語とかもあるし大変だろ
- 412 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 10:52:18.31 ]
- そこはほら、jperlだょ
- 413 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 10:56:38.26 ]
- >>398の方法がすでに>>408をすでに解決している件
- 414 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 10:58:06.65 ]
- s/すでに//
- 415 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 11:07:35.20 ]
- CAPTHAの件、
文字を扱えるのは人間だけだってことか
utf8フラグが文字を扱えるわけじゃないってことか。。。
- 416 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 11:27:22.19 ]
- >>415
何を言ってるのかさっぱりわからん。
データを見た時、データだけでそれが文字かどうかは人間しか分からないから
データとは別に、utf8フラグを明示的につけてやることで
コンピュータが文字と認識できるようになるってことだろ
- 417 名前：デフォルトの名無しさん [2012/02/04(土) 11:37:30.63 ]
- >>415-416
どっちも意味わかんねーよ
- 418 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 11:43:31.42 ]
- 今日は土曜日！二日市に行こうかな。
でもな、特に目ぼしいものナさそう。
ノートパソコン欲しい。mac book airよさそうと思ったけど、最低８万するんだね。
たかい。
- 419 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 11:47:43.01 ]
- >>417
ようするにファイルのことだよ。
ファイル中身を見ただけじゃ、それが文字ファイル
（テキストファイル）なのかバイナリファイルなのか分からない。
もちろん、入っているデータや拡張子から推測はできるが
100%正しい訳じゃない。
それは変数に入っている値も同じで、
コンピュータ（Perl）は中に入っているのが文字なのかバイナリなのか分からない
その二つを区別できなければ、”文字”数の情報が必要な処理や
1文字づつ処理するような関数が作れない。
よくあるのが、マルチバイト文字を渡したら、1文字の左半分だけ残って
右半分が落ちてデータが壊れるとかね。
だから、UTF8フラグというものが必要で、それをつけることでPerlは
文字として判断できるようになる。
まあ、これがモダンな（といっても何年も前から）のPerlの文字列の扱い方。
- 420 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 14:26:37.57 ]
- >>398
CAPCHA認証を行っている多くのサイトは、まさに今それをやってるんだよ。
Googleから判読不能な文面を受け取って、自身のCAPCHAシステムに組み込み、
入力の集積結果をGoogleに渡してお金を貰うという仕事だ。
- 421 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 14:42:49.67 ]
- CAPCHAは無理だろ
記号着地問題とかフレーム問題とかクリアせにゃ
超精度のOCRのようなモンができても、
文字じゃなくぬこ写真が出てくれば、それまでだ
画像を記号に変換するつよーいAIが登場しないと、
CAPCHA突破はﾑﾘﾑﾘだぁ
- 422 名前：デフォルトの名無しさん [2012/02/04(土) 15:16:05.36 ]
- 愛くるしいぬこ写真がこれ程凶悪な障壁になろうとは誰が予想しただろうか
- 423 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 16:01:40.04 ]
- ファイルテスト演算子の-dでディレクトリかどうかを判断すると
ディレクトリが多数あるのに「.」「..」しかヒットしないんですが、なにが原因ですか？
- 424 名前：デフォルトの名無しさん [2012/02/04(土) 16:06:17.48 ]
- □判定前のファイルとフォルダ混在した一覧にはフォルダはあるのか
□対象ディレクトリのパスは間違っていないか（特に相対パスの場合）
- 425 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 16:17:13.41 ]
- どんな言語であろうとCAPCHAは無理なんだな
そりゃCAPCHAが大流行するわけだ
- 426 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 16:18:02.35 ]
- -d 使っているまさにそのコードで cwd してみそ
- 427 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 16:25:57.57 ]
- ぼくが考えた最強の
KATO-CHA
- 428 名前：デフォルトの名無しさん mailto:sage [2012/02/04(土) 16:31:44.21 ]
- ちゃっとだけよ（はあと）
- 429 名前：423 mailto:sage [2012/02/04(土) 16:41:35.10 ]
- >>424
レスありがとうございます
・フォルダはあります。
・対象ディレクトリのパスは間違ってないです。コード中の
while (my $file = readdir $dh) {
if (-d $file) {
print $file;
}
となってるところを
while (my $file = readdir $dh) {
print $file;
にしてみたらちゃんと目的のディレクトリを含むファイルの羅列がprintされました。
なぜファイルテスト-dが成功しないんでしょうか？
- 430 名前：423 mailto:sage [2012/02/04(土) 16:44:42.38 ]
- >>426
レスありがとうございます。
use Cwd qw(getcwd);
$ret = getcwd();
print $ret;
したら、このコードが置いてあるディレクトリ名が表示されました。
ディレクトリハンドルに指定したディレクトリとは違います。
- 431 名前：デフォルトの名無しさん [2012/02/04(土) 16:50:22.36 ]
- if (-d $file)
を
$filepath = "検索対象のディレクトリ/" . $file;
if (-d $filepath)
に変更するとか？
|
 |
