ベストアンサー Perlのuseについて 2017/02/01 17:46 ズバリ、「use」とはどのような意味なの？ また、 use FileHandle; などは、日本語にするとどのような意味になるのでしょうか？ みんなの回答 （1） 専門家の回答 質問者が選んだベストアンサー ベストアンサー t_ohta ベストアンサー率38% (5320/13881) 2017/02/01 17:54 回答No.1 use はモジュールの読み込みを指示する命令です。 use FileHandle; は FileHandle というモジュール（ライブラリ）を利用できるよう読み込みを指示しています。 質問者 お礼 2017/04/15 15:05 ありがとう。 広告を見て全文表示する ログインすると、全ての回答が全文表示されます。 通報する ありがとう 0 カテゴリ [技術者向] コンピュータープログラミング・開発Perl 関連するQ&A use strictが効かない (PERL) たびたびお世話になっております。 PERL version 5.14.2 をWindows 7 のコマンドプロンプトから起動して使っています。 use strict; と一行目に書くと 宣言されていない変数があれば拒絶されるとのことで #!/usr/bin/perl use strict; use warnings; $a = 10; print "$a\n"; というスクリプトを書きました。が、すんなり動いてしまいます。 use strict; は どうすればうまく効くのでしょうか。 ご指導お願いします。 perl use strict エラーにならない? perlの使い方を勉強しているのですが use strict;を記述すると 変数宣言が必要になるということですが 以下のように記述してもエラーになりません。 use strict;を記述すると my $a;がないと$a="Hello";で エラーになるのではないのでしょうか。 ---test.pl---- use strict; $a="Hello"; print $a; -------------- >test.pl Hello > (Windows7, ActivePerl) Perlでuse strictと %inの共存 use strictを使うと、変数の使用に厳密にチェックしてくれるので、便利だと思い使いましたが、ReadParse後の%inを利用する場合に宣言されていないエラーが表示されます。意味的には正しいですが、$in{'test'}など CGIで受け取った内容が扱えなくなるので、困っております。何か解決方法は有るのでしょうか？ use strict; require 'cgi-lib.pl'; require 'jcode.pl'; &ReadParse; my $x = $in{'md'}; ネットワークエンジニアとは？技術職の未来を考える OKWAVE コラム Perlバージョン違いと use encoding; Perl 5.6とPerl 5.8の両方を使っています。 use encoding 'utf8';を 5.6で使うとエラーになるので バージョンを調べて条件分岐を行おうとしていますが、 use はどこに書いても実行される？ので、エラーが回避できません。 何か良い方法はあるのでしょうか？ use encoding 'utf'; $|=1; print "Version=$]\n"; use utf8; if($] >= 5.008001){ print "*** PASS ***\n"; use encoding 'utf8'; } use CGI サンプルスクリプトのなかに use CGI qw(:cgi :form); use CGI::Carp qw(fatalsToBrowser); use Image::Magick; と書かれていたのですがuse CGI::Carp qw(fatalsToBrowser);は意味わかったのでコメントアウトしましたがuse CGI qw(:cgi :form);は何を読み込んでいるのですか?コメントアウトしても大丈夫でしょうか? イメージマジックは使うのでそのままにしてあります よろしくお願いします Perl の use strict に付いて ●HTML <html><head> <meta http-equiv="content-type" content="text/html;charset=UTF-8" /> <title>テスト5（UTF-8）</title> </head> <body> <form action="test5.cgi" method="post" > <input type="text" name="f1" value="" size="80"> <button type="submit" >送信</button> </form> </body></html> —————————————————————————————————————— ●Perl #!/usr/bin/perl #use strict; ※問題の行1 use warnings; use CGI; print "Content-type: text/html\n\n"; print "<meta charset=\"UTF-8\">\n"; # POST / GET パラメータを取得------------------------- my $q = new CGI; # パラメータ名を指定して取得する my $param1 = $q->param('name1'); my $param2 = $q->param('name2'); # ＦＯＲＭ値の取得----------------------------------- # 全てのパラメータを取得する for my $param_name ($q->param) { print $param_name . ' = ' . $q->param($param_name) ; print "<br>\n"; ${$param_name} = $q->param($param_name); ※問題の行2 } #------------------------------------------------- print "テスト<hr>\n"; print "$f1<br>\n"; exit; —————————————————————————————————————— 【質問】 「※問題の行1」+「※問題の行2」 = エラー 「※問題の行1」のみ = 正常に動きます 「※問題の行2」のみ = 正常に動きます 「※問題の行1」の「use strict; 」と 「※問題の行2」の「${$param_name} = $q->param($param_name); 」 をどう書き換えれば、二つとも記述したまま正常に動くのでしょうか？ よろしくお願いします。 use strict;でエラー use strict;と書くとエラーになります。 strict.pmをstrict1.pmにしてuse strict1;にするとエラーはなくなります。 strictは予約語ですか？ これと同じ現象になった人はいませんか？ PerlでのUseless use... お世話になります。 真になる演算子が１を、偽になる演算子がundefを返すことを研究しています。 print "3 == 3：【", 3 == 3, "】\n"; であれば、3 = 3が1を返すので 3 = 3:【1】 となります。 print "3 > 4：【", 3 > 4, "】\n"; であれば、3 > 4がundefになるので 3 > 3:【】 になります。 さて、and 演算子を使ったところも見たいと重い、 print "3 == 3 and 3 > 4：【", 3 = 3 and 3 > 4, "】\n"; と書いて実行すると Useless use of a constant in void context at C:\Perl\perl\showAndTF.pl line 8. という警告と共に 3 == 3 and 3 > 4：【1 と出力されてしまいます。 これはなぜでしょうか。 よろしくお願いします。 USEの用法について質問です。 下記の文のuseの使い方と意味が和訳を読んでもまったく理解できないので教えてください。 use はelectrical appliances for homeにかかっていると考えているのですが 正しいのでしょうか？ また何故原型useになるのでしょうか？ この場合useはどのような意味を持っているのでしょうか？ 宜しくお願いします。 _______________________________________________________ 英文 AAA is an electrical shop where we can puchase electrical appliances for home use at a considerably lower price. 和訳 AAAは家庭用電気器具がかなり安価で手に入る電気店だ。 useのことについて教えてください。 use Net::SMTP; という構文が出てきました。 use ＜Moduleの内容をインポートする＞ といったことが書いてありました。 ということは、任意のパスに「Net::SMTP」などのようなModuleのファイルを置いておく必要があるということでしょうか。 それとも、Perlにすでにあっていて、インポートしに行くということなのでしょうか。 Fair Use Wizard 2の文字化け Fair Use Wizard 2を日本語で使おうとすると、文字化けしてしまいます。 英語で使う分には問題ありません。 OSはWindows2000です。 原因のわかるかた教えていただけないでしょうか。 よろしくお願いします。 rules-in-use rules-in-useとはどういう意味でしょうか？ 英文を読んでいて出てきたのですが、よく分からなくて。。 AIは使う人の年齢や市場にも影響する？人工知能の可能性 OKWAVE コラム it is no use doing こんにちは。 「it is no use doing.」（～するのは無駄だ） について、聞きたいことがあります。 まず「use doing」は動詞が二個つながっているのですが、よいのですか？ （このuseは名詞として使われてるのでしょうか？） このdoingは動名詞らしいのですが目的語でしょうか？そうだったら動名詞は動詞の目的語にはならないから・・・ （やっぱりこのuseは名詞？） うーん、よくわかりません。英語は苦手なので、詳しく教えて下さい。お願いします。 Grammer in use について どうもm(__)mこんにちは。今、大学を再受験しようと奮闘しているのですが、私は今まで英語をわざわざ日本語に置き換えて理解しようとしていました。そこで、英語を英語で理解しようと思い、まずは文法についてネットで探していましたところ、『Grammer in use』って本を見つけました。この本がbasic,intermediate,advanced,に分けてあるのですが、高校～大学入試の文法をおさらいしたいと思いますのでどれがよいでしょうか？？知っている方がおられたら教えてくださいお願いしますm(__)m Perlで use strict して our変数 Perl 初心者です。初めて質問します。 test_sub.pl で宣言した変数を test_main.pl から参照したくて悩んでいます。 環境 ： WindowsXP / ActivePerl 5.14.2 -------------------- * test_sub.pl -------------------- #!/usr/bin/perl use strict; our $hoge = 'HOGE'; 1; -------------------- * test_main.pl -------------------- #!/usr/bin/perl use strict; require 'test_sub.pl'; print "Content-type: text/html\n\n"; print $hoge; -------------------- これを実行すると、 Global symbol "$hoge" requires explicit package name at C:/public_html/cgi-bin/test_main.pl line 7.\r というエラーが出ます。 require する前に、test_main.pl のほうで our($hoge); と宣言したり 参照する際に print $main::hoge; とパッケージを指定したりすればいけるのですが、 これらをしないとできないものなのでしょうか。 use strict; を書かなければ最初のソースでも動くのですが use strict は書きたい… 継承のようなことをしたいのです。 ちなみに以下試してみたソースです。 -------------------- * test_main.pl -------------------- #!/usr/bin/perl ######################################## # NG use strict; require 'test_sub.pl'; print "Content-type: text/html\n\n"; print $hoge; ######################################## # OK our変数を宣言しておくといける =pod use strict; our ($hoge); require 'test_sub.pl'; print "Content-type: text/html\n\n"; print $hoge; =cut ######################################## # OK 参照する際にパッケージ名を指定すればいける =pod use strict; require 'test_sub.pl'; print "Content-type: text/html\n\n"; print $main::hoge; =cut ######################################## ######################################## # NG =pod use strict; use base qw(test_sub); print "Content-type: text/html\n\n"; print $hoge; =cut ######################################## -------------------- * test_sub.pm -------------------- #!/usr/bin/perl package test_sub; use strict; our $hoge = 'HOGE'; 1; -------------------- NG パタンはどちらも Global symbol "$hoge" requires explicit package name のエラーとなります。 もしご存じの方がいらっしゃいましたら教えてください。 よろしくお願いします。 after useとafter used,using ある日本のレストランのトイレでこの文をみました。 多分赤ちゃんを座らせて置くやつだと思いますが。 ”Close after use.” 私は、”使った後”は元に戻してという意味で Close after usedと思ったんですけど、これは不正解とききました。 なぜ、過去のことが、useの現在形になって正しいのですか？ 正しい書き方は Close ...after using. と、ききました。 まったくわかりません。 教えてください perl use strict; と ファイルハンドルについて perl use strict; を使うと、単純なエラーが防げると認識していますが、下記スクリプトでは役に立たなかったようで、このエラーを探すのに苦労しました。 他にも、どこかのサブルーチンでsortを使ったスクリプト中で、$aを使った時もおかしな挙動をしたことがあります。 use strict;の使い方は正しいと思うのですが、エラーを出してはくれないものでしょうか? また、このようなエラーをしないために安全なプログラムの書き方はありますか? use strict; open(F,"<file.txt"); while(<F>){ &abc($_); } close(F); sub abc(){ my $str = shift @_; open(F,">>file2.txt"); print F $str; close(F); } use OS(win xp)を入れなおして、 Active Perl をインストールしなおしたのですが、 use Benchmark; と書いたスクリプトをコマンドプロンプトで走らせると、 "use" not allowed in expression at log.cgi line 4, at end of line syntax error at log.cgi line 4, near "use Benchmark" Execution of log.cgi aborted due to compilation errors. とエラーが出ます。OSを入れなおす前もたしかActive Perlを普通にインストールし、普通にベンチマークとっていたと思うので、「あれ・・？」って感じです。/usr/local/lib/の中にもちゃんとBenchmark.pmが入っているようなのですが、なにがいけないのでしょうか。 Use を使って このカードは使えますか はい 使えます。 Do you accept this card? (Yes can use.) (しか思い浮かばないのですが、アドバイスの文をお願いします。) この文のemployは、 useに書き換えられますか？ こんにちは、このような英文 There are many techniques you can employ to help improve your game. これを、自分なりに訳してみると、 「沢山の手法がり、貴方はそれをゲームに役立てることができます。」だと思うのですが、 この英文で使われている、employは、useと同じ意味で使われていて、 There are many techniques you can use to help improve your game. と同じ意味になると考えてよいのでしょうか？ ご教示ください。よろしくお願いします。 注目のQ&A 「You」や「I」が入った曲といえば？ Part2 結婚について考えていない大学生の彼氏について 関東の方に聞きたいです 大阪万博について 駅の清涼飲料水自販機 不倫の慰謝料の請求について 新型コロナウイルスがもたらした功績について教えて 旧姓を使う理由。 回復メディアの保存方法 好きな人を諦める方法 小諸市（長野県）在住でスキーやスノボをする方の用具 カテゴリ [技術者向] コンピューター プログラミング・開発 Microsoft ASPC・C++・C#CGIJavaJavaScriptPerlPHPVisual BasicHTMLXMLCSSFlashAJAXRubySwiftPythonパフォーマンス・チューニングオープンソース開発SEOスマートフォンアプリ開発その他（プログラミング・開発） カテゴリ一覧を見る OKWAVE コラム 突然のトラブル？プリンター・メール・LINE編 携帯料金を賢く見直す！格安SIMと端末選びのポイントは？ 友達って必要？友情って何だろう 大震災時の現実とは？私たちができる備え 「結婚相談所は恥ずかしい」は時代遅れ！負け組の誤解と出会いの掴み方 あなたにピッタリな商品が見つかる！ OKWAVE セレクト コスメ化粧品 化粧水・クレンジングなど 健康食品・サプリ コンブチャなど バス用品 入浴剤・アミノ酸シャンプーなど スマホアプリ マッチングアプリなど ヘアケア 白髪染めヘアカラーなど インターネット回線 プロバイダ、光回線など
お礼
ありがとう。