Perlについての質問箱 64箱目

**デフォルトの名無しさん** · 2019/02/01(金) 09:44:37.18

CGIについての質問は板違いです。WEBプログラミング板でどうぞ。
CGIとPerlの区別がつかない人もWEBプログラミング板に行ってください。
（WEBプログラミング板: https://medaka.5ch.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
Download Latest Stable Source (5.28.1)

▼前スレ
Perlについての質問箱 61箱目
http://toro.5ch.net/test/read.cgi/tech/1381561905/
Perlについての質問箱 62箱目
http://toro.5ch.net/test/read.cgi/tech/1385039352/
Perlについての質問箱 63箱目
https://mevius.5ch.net/test/read.cgi/tech/1392820583/

**デフォルトの名無しさん** · 2020/08/15(土) 20:49:31.50

>>644
まあ、そんなに巨大だったら、どっちにしろ死ぬやろけどな。ｗ
本気で心配するならチビチビつままないと。

**デフォルトの名無しさん** · 2020/08/16(日) 03:38:06.22

Ruby の、Nokogiri で、スクレイピングしてみた

require 'nokogiri'

doc = Nokogiri::HTML(<<EOT)
<div>
AAABBBCCCDDD
</div>
EOT

p_tags = doc.css( "div > p" ) # div の直下のp
half_cnt = p_tags.length / 2

def make_p_str( ary ) # 要素の配列から、文字列を作る
str = ""
ary.each do |elem|
tmp = elem.to_html # 要素
tmp.chomp! # 末尾の改行を削除する
str += tmp # 連結
end
str
end

p str_before = make_p_str( p_tags[ 0...half_cnt ] ) # 前半
p str_after = make_p_str( p_tags[ half_cnt..-1 ] ) # 後半

出力
"AAABBB"
"CCCDDD"

**デフォルトの名無しさん** · 2020/08/16(日) 06:28:33.83

Mechanizeでやれる?

**646** · 2020/08/16(日) 07:20:54.63

Mechanize とか、curl + Nokogiri でも、静的なページなら、DOM を取得できるけど、

Ajax など、JavaScript で、動的にDOMを組み立てている場合は、
sleep するとか、Selenium WebDriver などを使わないと、DOMを取得できない

5ch などは、空のHTMLを送ってきてから、
Ajax で、ページの内容を取得しているから、
HTMLをスクレイピングするだけでは、タイミングによっては内容が存在しない

**646** · 2020/08/16(日) 07:27:51.64

Ruby で、curl, Nokogiri の例

require 'nokogiri'

html = `curl http://www.example.com/`
doc = Nokogiri::HTML( html )

elements = doc.css( "h1" )
puts elements.first.content #=> Example Domain

open-uri の例

require 'open-uri'
require 'nokogiri'

url = 'http://www.example.com/'
doc = Nokogiri::HTML(open(url))

**デフォルトの名無しさん** · 2020/08/16(日) 07:29:48.83

プロテクトのつもりは無いんだろうけど、機械にやさしくない
最近だとメルカリのページ取得して、なんで空? と思った

**646** · 2020/08/16(日) 09:02:04.52

Selenium WebDriver なら、指定した要素が出現するまで、指定した時間だけ待ってくれる

漏れは、10～20秒ぐらいを指定してる

**デフォルトの名無しさん** · 2020/08/16(日) 09:19:07.80

webであれこれしたいなら、javaが近道なのは自明だな

**デフォルトの名無しさん** · 2020/08/16(日) 13:18:51.97

Javaは、なにをするにしても遠回りやろ。ｗ

**デフォルトの名無しさん** · 2020/08/16(日) 14:20:54.02

逆にPerlできないことってなんだ？
ライブラリは揃ってるものとして

**デフォルトの名無しさん** · 2020/08/16(日) 15:22:58.74

あんまりない
弱いのはライブラリ面なので言語的に不足してる機能はそれほどない

**デフォルトの名無しさん** · 2020/08/16(日) 16:02:30.33

CPANを探してなかったという経験がないしな

**デフォルトの名無しさん** · 2020/08/16(日) 18:58:24.31

なら、C++があれば他の言語は要らなくなる。
さらに極言すれば、アセンブラがあれば他の言語は要らなくなる。

**デフォルトの名無しさん** · 2020/08/16(日) 19:02:50.27

GUIは弱い。
まあ強いと言っていいのはC#くらいだから、しゃあない？

**636** · 2020/08/16(日) 20:53:31.17

返信が遅くなってすいません
>>640,643,646
勉強になりました
ありがとうございました

**デフォルトの名無しさん** · 2020/08/17(月) 01:24:18.13

GUI必要なツールはC#使うけど、CUIだけとか引数もなくて単に実行するだけとかそういうのだいたい全部Perlで書いてる

**デフォルトの名無しさん** · 2020/08/17(月) 07:07:29.41

GUIって結局、裾野の方々でも使えるようにする工夫であって、
テキストエディタで条件設定した方がよっぽど効率いい場合が殆どなのでは

自分専用ツールでGUIで作った記憶がない

**デフォルトの名無しさん** · 2020/08/17(月) 07:25:27.72

>>661
スマホのアプリはテキストエディタを使うのが主流か？

**デフォルトの名無しさん** · 2020/08/17(月) 07:41:47.99

スマホのは作ったことすらないけど、
CUIなんて選択肢がそもそもあるのか?

**デフォルトの名無しさん** · 2020/08/17(月) 10:16:26.85

>>661
だからなに？
ああそう、とかいってほしいの？

**デフォルトの名無しさん** · 2020/08/17(月) 11:54:02.58

PerlでスマホのGUI作れるんですか？

**デフォルトの名無しさん** · 2020/08/17(月) 12:04:54.68

GUIが必要ないものはPerlでって話でしょ
これに噛み付いた>>661が意味不明

**デフォルトの名無しさん** · 2020/08/17(月) 12:18:14.46

噛みつかれた、と思っちゃうのが糖質なんだよな
書き込みがみんな攻撃に見えるっていう

**デフォルトの名無しさん** · 2020/08/17(月) 12:19:54.46

>>653
だってJavaとPerlでスマホのGUIを比べるのがどうかしてる

**デフォルトの名無しさん** · 2020/08/17(月) 14:26:41.31

>>667
わけがわからなすぎるからな。
攻撃に見えてもしゃあない。

オレには隙自語に見えた。

で、本人はどういうつもりなの？

**デフォルトの名無しさん** · 2020/08/17(月) 15:10:53.35

http://hissi.org/read.php/tech/20200817/TVNIQiswMHQ.html

>>669は聞きたい事が多い

**デフォルトの名無しさん** · 2020/08/17(月) 17:15:38.44

そうだねでいいんでね　おれもそう思う
GUIがあった方がいいなって時はつければいいし

**デフォルトの名無しさん** · 2020/08/17(月) 18:21:33.00

あー。PerlでスマホのGUIか。書けたらいいな。
ていうか世界は広いからとっくの昔に誰かが作ってそう。

**デフォルトの名無しさん** · 2020/08/17(月) 22:59:27.97

その昔はGUIといえばperlだったんだけどな

**デフォルトの名無しさん** · 2020/08/18(火) 01:35:21.75

Perl（パール）［Pathological Eclectic Rubbish Lister］
Google翻訳［病理学的折衷的なゴミリスター］

どうしてこうなった？

**532** · 2020/08/18(火) 02:10:03.41

perlのguiといえばTk, Tkx, wxWdget, Qt, GTK …色々あって
やろうと思えばやれると思うけど。

ｵﾚはPerlではTk, Tkxしかやったこと無いけどさ

**デフォルトの名無しさん** · 2020/08/18(火) 02:46:33.41

GUI必要がなら普通にWebアプリでいいと思う

**デフォルトの名無しさん** · 2020/08/18(火) 03:58:15.17

>>674
ラクダ本にそう書いてなかったっけ？

**デフォルトの名無しさん** · 2020/08/18(火) 04:26:54.25

>>677
「病理的に異常な妥協を寄せ集めたゴミくずリストを作るものです」と？

**デフォルトの名無しさん** · 2020/08/18(火) 06:36:49.23

処理が終わったらwindowsにポップアップを出すくらいでいいわ

**デフォルトの名無しさん** · 2020/08/18(火) 12:11:19.03

>>676
同感
適材適所
Perlは高度なバッチ処理が適所だと思う

**デフォルトの名無しさん** · 2020/08/18(火) 22:52:59.68

>>673
馬鹿？それとも釣り？

**デフォルトの名無しさん** · 2020/08/18(火) 23:26:43.99

>>681
perl/tk をご存じないのか?

**デフォルトの名無しさん** · 2020/08/18(火) 23:33:31.65

やれるというのと、それを目標に人が集まってくるのは別

rubyのrailsとかpythonの機械学習とかみたいに、
GUIの為にperlを覚えたような奴を見たことない

**532** · 2020/08/19(水) 01:09:23.66

GUIのために言語を選ぶ？
少なくともperlにおいては、そんなことないだろJK

**デフォルトの名無しさん** · 2020/08/19(水) 01:48:37.55

>>682
そんなに出来のいいものではなかった記憶。
Tk自体も、Perlとのなじみかたも。

CでXを直接使うよりはマシに違いないが。

**デフォルトの名無しさん** · 2020/08/19(水) 02:10:38.31

>>682
その前にWindowsのGUIの方が普及しただろうが
あれはperlで書かれていたのか？
馬鹿は黙っていればいいのに

**デフォルトの名無しさん** · 2020/08/19(水) 03:51:07.71

もはや何の話題だかわからん罠
CGIでPerlを使う話からどうやったらこんなカオスが生まれるのか

**デフォルトの名無しさん** · 2020/08/19(水) 04:27:02.72

CGIの話なんかしてない

**デフォルトの名無しさん** · 2020/08/19(水) 07:00:19.93

Microsoftが卑怯な手段を使ったから普及したのでは？

**デフォルトの名無しさん** · 2020/08/19(水) 11:45:52.26

Microsoftがどうこうというよりも、ほかがどんくさかっただけやろ。

Windowsは、メッセージループとかコピペとか、最初からけっこうこなれてたような。
どっちも、今ならあんな仕様にはきっとしてなさそうな気はするが、当時としてはなかなか。

**デフォルトの名無しさん** · 2020/08/20(木) 22:13:21.51

で、GUIと言えばperlと言われたのはいつの時代のどのアプリやOSなのかね
個人的な思い込みではなく

**デフォルトの名無しさん** · 2020/08/20(木) 22:27:06.96

多分、GUIとCGIを間違っている

**デフォルトの名無しさん** · 2020/08/20(木) 22:29:40.80

CUI + CGI = GUI

**デフォルトの名無しさん** · 2020/08/20(木) 23:31:14.76

GUCCI

**デフォルトの名無しさん** · 2020/08/21(金) 19:46:29.97

そういや Perl/tk はその後日本語対応うまくいったのかな？
最初使った時にダメでそれ以来使ってないのだが。

**デフォルトの名無しさん** · 2020/08/21(金) 23:08:48.53

perlはモジュールの品質が悪すぎたな
どうにでもかけすぎた上にperlのオブジェクト指向きつい感じ

**デフォルトの名無しさん** · 2020/08/22(土) 01:02:30.20

君はpythonかjavaでもやってなさい

**デフォルトの名無しさん** · 2020/08/22(土) 04:05:19.81

オブジェクト指向は万能じゃないからな

ライブラリを効率的に使い回す方法をあれこれ模索してたら、
名前空間の衝突を積極的に使う方法に行き着いて、
いろんな型を統一的に扱えるように書けるようになったら、
これ何も知らない人から見たらただのオブジェクトだよなということで出来た
最終的なものに付けた名前であって、最初からオブジェクト指向を目指した訳ではない
そこからオブジェクトなんだったらどうせだからと、面倒くさい宗教に変わっていってしまった

だから、大層なものである必要は全然なくて、メンバーとメソッドが使えるだけで十分便利

**デフォルトの名無しさん** · 2020/08/22(土) 18:52:55.61

データ(オブジェクト)を中心に処理を考えるみたいなのが発展してオブジェクト指向になったのでは?
どう発展して来たかは今更どうでも良い話だが。

**デフォルトの名無しさん** · 2020/08/22(土) 20:13:39.18

オブジェクト指向でやるようなアプリはPerlでやるべきではないと思ってる
Perlはバッチ処理一択

**デフォルトの名無しさん** · 2020/08/22(土) 20:25:54.19

別にOOPで作りたいならPerlでいい。
Perlは文字列を扱うスクリプトで本領を発揮するもんだけどね。

>>770
そもそも動的片付けの言語でOOPはクソだと思ってるわ。

**デフォルトの名無しさん** · 2020/08/22(土) 20:28:35.53

>>701
perl「でも」いい。

**デフォルトの名無しさん** · 2020/08/22(土) 20:57:54.05

膨大なライブラリはオブジェクト指向のお陰なのに
小規模なダクトテープ的な処理しかしない人には不要だろうけど

**デフォルトの名無しさん** · 2020/08/22(土) 21:21:00.81

>>703
ライブラリはその通りだった…

ただメインモジュールを上位でオーバーライドしてどうのこうのとか
そういうのはいい思い出無い

**デフォルトの名無しさん** · 2020/08/22(土) 21:22:47.78

>>703
Perlでダクトテープ以上のものを作ろうとは思わないから。
ま、しゃーない。

**デフォルトの名無しさん** · 2020/08/22(土) 23:16:49.85

GUIならPerlとか書いてた人はどうした？

**デフォルトの名無しさん** · 2020/08/27(木) 23:16:27.34

普段は過疎っているクセに誰かが質問を書き込んだ途端クソどうでもいいヤジ馬（質問には一切答えられない）がわらわらと湧いてくる

**デフォルトの名無しさん** · 2020/08/28(金) 11:01:54.67

数日前からLWPでhttpsにつながらなくなったんですが、verify_hostnameを無効にするとつながります
Windows 10、straberry perlなんですが、Windows側の証明書の問題とかあるのでしょうか?
Mozilla::CAなど関係しそうなモジュールは最新にしてみましたが、改善しませんでした

**デフォルトの名無しさん** · 2020/08/28(金) 12:46:24.74

>>708
復元ポイントに戻る

**708** · 2020/08/28(金) 13:20:47.23

>>709
直るかもしれないけど、また何かが更新されてダメになるよね
ほかにないですか?

**デフォルトの名無しさん** · 2020/08/28(金) 14:19:31.83

証明書関連なんだろうけど、サーバの証明書が悪化してしまったのでは
クライアントとしては無視しないといけない状態に

**デフォルトの名無しさん** · 2020/08/28(金) 15:04:08.50

Let's Encrypt みたいな無料の証明書を使っているサイトかも。
そういうサイトが多い

証明書の期限切れ

**デフォルトの名無しさん** · 2020/08/28(金) 15:59:10.37

>>708
特定サイト（接続先）の話でしょ？
そのサイトの証明書の期限切れだと思うよ

**708** · 2020/08/28(金) 18:25:47.79

レスありがとうございます
特定サイトではなく、また、ブラウザでアクセスできてLWPではできないという状況です
その後、セキュリティソフトにESETを使っているのですが、
ESETにブロックされていることが分かりました
Mozilla::CAの証明書が気に入らないのか、ESETの不具合なのか..
どちらかが更新されるのを待ちたいと思います

**デフォルトの名無しさん** · 2020/08/28(金) 21:31:54.57

サーバーがオレオレ証明書だとそのエラーになる

**デフォルトの名無しさん** · 2020/08/28(金) 21:46:39.55

別にブラウザ作ってる訳でなし
どのサイトでも、ではなくて単に、複数の特定サイトでしょう

**708** · 2020/08/29(土) 10:51:10.89

確かにgoogleやyahooは大丈夫です
twitterはダメですが、こんな所もオレオレ証明書なんですか...

**デフォルトの名無しさん** · 2020/08/29(土) 11:09:22.43

けっこうキツい後だしやな。

**デフォルトの名無しさん** · 2020/09/04(金) 11:45:52.13

chocolateyでwindowsにstrawberry perlいれてたんだけど
upgradeしたらアンインストールされてインストールでこける
すでにインストール済みだとか、でも実態はアンインストール済み
どうすればいいのか

**デフォルトの名無しさん** · 2020/09/04(金) 12:13:42.72

MSYS2に乗り換える。

**デフォルトの名無しさん** · 2020/09/04(金) 15:02:41.01

木こりが明日のためにと残しておいた大木が次の日になったらどうにも見つからない
来る日も来る日も探すけれどどこだったか思い出せずとうとう10年の月日が過ぎてしまった
そこで木こりは思い直してその辺にあった木を切り倒したそうだ
「はっ！？」木こりはようやく気付いた

a.「木なんてみな同じ」
b.「理想を追い求める自分に酔ってた」
c.「Windows入れ直せ」

**デフォルトの名無しさん** · 2020/09/04(金) 15:55:39.64

× 木こり
○ 林業従事者

**デフォルトの名無しさん** · 2020/09/04(金) 15:58:22.63

Strawberry Perl 5.32.0 入れたんだけどcpanでinstallコマンドを使うとperl.exeがCPU消費したまま戻ってこなくなる現象が起きるね。

**デフォルトの名無しさん** · 2020/09/04(金) 16:02:36.23

今までになくTkをインストールするのが大変だった、5.32.0。
ソース改変してcpanの外でgmake & gmake installせざるを得なかった。
さっさと修正してほしい。

**デフォルトの名無しさん** · 2020/09/04(金) 18:10:58.52

思い切ってPyQTにしてみろ。こっちのがいいぞ。

**デフォルトの名無しさん** · 2020/10/08(木) 23:36:20.91

こんな過疎ったクソスレだけど、たまにやって来る質問者をガヤが追い出そうと必死になるんだよな
頭の中どうなってんだろ

**デフォルトの名無しさん** · 2020/10/11(日) 18:23:11.86

すいません、あるサイトの記述で下みたいな構文なんだけど
$aiueo = [AAA =>123,BBB=>345];
変数は変えてあります
ハッシュのリファレンスとは違うようなんだけど何をやってるかわかりますか？
それと、この構文で123をprintで表示してみたいのですがどうやればいいのでしょうか

**デフォルトの名無しさん** · 2020/10/11(日) 18:26:38.16

=>は,と同じなので単なる配列リファレンスです

**デフォルトの名無しさん** · 2020/10/11(日) 19:36:36.33

$$aiueo{AAA}
$aiueo->{AAA}
だっけ？

**デフォルトの名無しさん** · 2020/10/11(日) 20:54:29.02

一旦ハッシュ化しないと無理なのでは

**デフォルトの名無しさん** · 2020/10/11(日) 21:00:17.13

だね。配列のままなら print $aiueo->[1];

**デフォルトの名無しさん** · 2020/10/11(日) 21:08:33.51

配列() のリファレンスが []
ハッシュ() のリファレンスが {}

というややこしい部分に引っかかって間違って書いてるだけと予想

**デフォルトの名無しさん** · 2020/10/11(日) 21:26:08.40

pseudo hash の話かと思ったら違った

**デフォルトの名無しさん** · 2020/10/20(火) 10:47:47.83

教えて下さい。Windows10 で、ActivePerl 5.20.3 (Win32-x86)
を使っています。「use blib;」の一行だけのスクリプトを実行すると、
次のようなエラーが出ます。

Cannot find blib even in C:\
BEGIN failed--compilation aborted at C:\bin\blibtest.pl line 1.

しかし、C:\Perl\lib には、blib.pmというファイルがあり、
@INCには、C:\Perl\lib が含まれています。
blib を使うためには、どのようにすればよろしいでしょうか？

**デフォルトの名無しさん** · 2020/10/20(火) 12:39:40.78

環境変数からなら行けたような

**デフォルトの名無しさん** · 2020/10/20(火) 14:02:34.19

>>735
ありがとうございました。
しかし、環境変数PERL5LIBを使っても、同じでした。

Cannot find blib even in C:\
BEGIN failed--compilation aborted at C:\bin\blibtest.pl line 1.

C:\doc>set perl5lib
PERL5LIB=C:\Perl\lib

**デフォルトの名無しさん** · 2020/10/20(火) 14:40:16.81

>>734ですが、
そもそも何をしたかったのかということも書いておきます。
Windows の名前付きパイプを使おうとしており、このページ
https://metacpan.org/release/JDB/Win32-Pipe-0.025
にあるサンプルコード（test.bat、Client.pl、Server.pl）
を実行すると、Cannot find blib even in C:\ とのエラーが
発生しました。

そこで、問題を単純化して、>>734を書きました。

**デフォルトの名無しさん** · 2020/10/20(火) 14:46:34.93

なんでC:\なんか探しに行くんだろう

**デフォルトの名無しさん** · 2020/10/20(火) 18:08:46.77

blib.pmはカレントまたは指定したパスから数レベル上まででblib/libとblib/arch両ディレクトリが存在したら@INCの先頭に追加、無ければエラーで終了するだけのモジュール
該当ディレクトリが無かったからC:\にたどり着いたというだけ

Active PerlはWin32::Pipeバンドルされてたはずなのでblib不要

**デフォルトの名無しさん** · 2020/10/20(火) 18:38:58.16

>>739
よく解りました。ありがとうございました。

**デフォルトの名無しさん** · 2020/10/20(火) 21:44:35.79

blib.pmはちゃんとuseされていて、blib.pmの動作としてエラー終了したということですか

**デフォルトの名無しさん** · 2020/10/20(火) 22:27:40.87

die "Cannot find blib even in $dir\n" って blib.pm のソースに思いっきり書いてあるがな

**デフォルトの名無しさん** · 2020/10/20(火) 23:34:27.10

なるほd

**デフォルトの名無しさん** · 2020/10/25(日) 10:29:53.41

ライブラリが読めてないのか、読めてるけどエラーになるのかの切り分けが必要だったな