TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼
ふらっと C#,C♯,C#(初心者用) Part141
VBAなんでも質問スレ Part2
C#だとそんなに重くなるもんなの?
Borlandにはやられた...
今までに見たソースコードで一番感動したのは deux
【wasm】ブラウザでC++。Emscriptenを語ろう
フリーソフトなどに使われる言語は?
おまいらはディープラーニングの検定試験受けるの?
Vue vs React vs Angular Part.2
Tapestryについて語ろうよ!

Perl初心者スレ(マジレス回答)


1 :2012/10/07 〜 最終レス :2019/08/31
どうぞー

2 :
このスレッドは天才チンパンジー「アイちゃん」が
言語訓練のために立てたものです。
アイと研究員とのやり取りに利用するスレッドなので、
関係者以外は書きこまないで下さい。
                  京都大学霊長類研究所

3 :
>>1
おつ!
ありがとうございます

4 :
マジレス?
じゃあ遠慮なく
>>1
板荒らすために立てたんじゃないならさっさと削除依頼しろクズ
本スレでさえ閑古鳥が鳴いてるのに次スレ立てるから荒らし予備軍の温床になってんだよ
今日の糞スレ乱立を見ればわかるだろ

5 :
■関連スレ
在日韓国人プログラミング
http://toro.2ch.sc/test/read.cgi/tech/1349527575/
チョッパリは謝罪しる!
http://toro.2ch.sc/test/read.cgi/tech/1349527506/
おちんちんを入れてください
http://toro.2ch.sc/test/read.cgi/tech/1349527445/
ほむらたんをあいしてる
http://toro.2ch.sc/test/read.cgi/tech/1349518465/
我らPGにしてPGにあらず
http://toro.2ch.sc/test/read.cgi/tech/1349518997/
おちんちんを入れる
http://toro.2ch.sc/test/read.cgi/tech/1349518715/

6 :
■関連スレその2
カチャカチャPGの叫び
http://toro.2ch.sc/test/read.cgi/tech/1349518930/
プログラマー=キチガイ
http://toro.2ch.sc/test/read.cgi/tech/1349518840/
チンパンジーの舞
http://toro.2ch.sc/test/read.cgi/tech/1349516893/
今、ム板に必要なのはIDより板の設定変更
http://toro.2ch.sc/test/read.cgi/tech/1349513203/
こんにちはみなさん。
http://toro.2ch.sc/test/read.cgi/tech/1349503990/

7 :
>>1
基地害乙

8 :
初心者なので CGI と Perl の区別がつかないこともあると思いますが、
どうぞ質問してください。
スレ違いの質問にはスルーか、速やかな誘導をお願いします。
回答者が現れるまで待ちましょう。
[プログラミング自体の経験が無いひとはまずココを読む]
とほほのperl入門: ttp://www.tohoho-web.com/wwwperl.htm
[厳選・オンラインドキュメント]
perldoc.jp: ttp://perldoc.jp/
Perl メモ: ttp://www.din.or.jp/~ohzaki/perl.htm
Perl のページ: ttp://homepage1.nifty.com/nomenclator/perl/
Perl の小技: ttp://homepage3.nifty.com/hippo2000/perltips/index.htm

9 :
# [Perl 日本語処理の基礎の基礎]
# まず、以下の行を先頭に入れて下さい。
use utf8;
use open IO => ":encoding(cp932)";
binmode STDIN => ":encoding(cp932)";
binmode STDOUT => ":encoding(cp932)";
binmode STDERR => ":encoding(cp932)";
use Encode;
# 以上の内容は、日本語処理が解らない人でも、とりあえず日本語処理ができてしまう
# おまじないです。

10 :
上記の記述は1行で書くこともできます。
use encoding 'cp932'; # [Perl 日本語処理]
初心者にはこれが一番あってると思います。
徐々に経験を積んで、難しい記述にチャレンジしていきましょう。

11 :
そもそもプログラム初心者にPerl選択などありえない

12 :
初めてのPerl第6版と赤らくだ本は分量的にも内容的にもほぼ同じだしな

13 :
ここは本スレではありません。
こちらへどうぞ。
Perlについての質問箱 56箱目
http://toro.2ch.sc/test/read.cgi/tech/1348141100/

14 :
↑ながらく機能していない上にCGIの質問をすると怒られます。
 Perlの質問をするとPHPの回答が返ってきます。
 それでも構わないなら、どうぞ。

15 :
やっぱりPHPの方がいいんですかね。

16 :
プログラム初心者じゃなくてPerl初心者な。PHPは卒業な。

17 :
■関連スレ
おちんちんランド開園
http://toro.2ch.sc/test/read.cgi/tech/1349453856/
ム板を荒らしている連中の正体
http://toro.2ch.sc/test/read.cgi/tech/1349260204/
おちんちんを舐めよう
http://toro.2ch.sc/test/read.cgi/tech/1349454008/
ム板住民に言いたい1000のこと
http://toro.2ch.sc/test/read.cgi/tech/1349192669/
低級言語のすばらしさ
http://toro.2ch.sc/test/read.cgi/tech/1349496941/
 
http://toro.2ch.sc/test/read.cgi/tech/1349502749/
ム板の住民構成
http://toro.2ch.sc/test/read.cgi/tech/1349453824/

18 :
PHPでいう、in_arrayは
Perlではなんて関数ですか?

19 :
grepでいいんじゃないか?UNIXの文化な

20 :
>>19
ありがとうございます。
それからもうひとつ、
array_uniqueに相当する関数はどれでしょうか?

21 :
ハッシュのキーにして、最後にキーを取り出す

22 :
my %uniq = map { $_ => 1 } @array;
my @array_uniq = keys %uniq;

23 :
長いな。

24 :
初心者に変なもん奨めるんじゃないぞ

25 :
%u = map {$_,1} @a;
@u = keys %u;
#チヂメテミタ

26 :
my @array_unique = keys %{{map {$_,1} @array}};
perl 5.14 以降なら
my @array_unique = keys {map {$_,1} @array};

27 :
ひと頃List::Utilが湧いたのはPHPとの比較が原因か

28 :
>>26
なんかバッドノウハウ臭が強いな。

29 :
んなこたあない。

30 :
ここでList::Utilを持ち出し、直後からスレが荒れるのが定番。

31 :
あるサイトにアクセスして数値を取得してreturn $num;で値を返す関数を作ったとします
get_num();
my $num=200
while(1)
{
if(new_num() >=$num)
{
okと表示
}
}
okがうまく表示されません
毎回get_numでサイトにアクセスして取得しているというのが悪いんでしょうか?原因がわかりません教えてください

32 :
new_num()で取得した値は $numより大きいです
大きいのになぜか比較されずにスルーで何も表示されずループです

33 :
>あるサイトにアクセスして数値を取得してreturn $num;で値を返す関数を作ったとします
↑これは get_num() のことですか?new_num() のことですか?
get_num() は return $num; しないんですか?戻ってきた値は使わないんですか?
>毎回get_numでサイトにアクセスして
↑ get_num() は while の中にありませんが、この外にループがあるんですか?

34 :
use strict; 落ちか
腕を上げたようだな、モダンPerl。

35 :
>>31
$|=1;
それかprint "ok\n";
改行いれとけ

36 :
改行入れてもループは終わらんだろw

37 :
>>31
マジレスすると
お前みたいな低脳には無理

38 :
荒らしの連立てしたスレを伸ばそうとしてる>>31は荒らし
消えろやゴミが

39 :
>>37=>>38

40 :
>>37=>>38=>>39

41 :
>>31=>>39

42 :
$|=1;
my $num=200; ←セミコロン忘れるな
while(1){
  if(get_num() >= $num){ ← get_num()、な
    print "ok\n"; ← うるせぇやつがいるから改行、な
    last; ← これなけりゃ無限ループだわな
  }
  sleep(60); ← Web にアクセスするなら忘れるんじゃねぇぞ
}

43 :
なんで>>31みたいなカスがプログラミングなんかに手を出したのか疑問。

44 :
>>43
そんなのが疑問になるのは
お前が馬鹿だからじゃないだろうか。

45 :
>>43=>>44=>>37=>>38

46 :
>>43=>>44=>>37=>>38=>>31=>>45

47 :
文字列 $str の末尾の「.cpp」を「.o」に置換し新たな文字列 $new_str を生成したいのですが
s/// だと元文字列を書き換えてしまいます
コピーしてから置換でも良いのですが、書き換えずに置換する関数や演算子はないでしょうか?

48 :
>>47
寝言は寝て言えキチガイ

49 :
>>44=>>48

50 :
>>47のような害虫はム板から駆除しなければならない。

51 :
>>47
s/// に /r を指定するとよろし

52 :
>>47
演算子一覧くらい検索すればいくらでも出てくるだろ
それすら検索できないって本物の精神異常?

53 :
>>47はプログラミングに向いてない。

54 :
煽り叩きに加えて今度はイコール厨まで参戦ですか
ほんとスレの空気を悪くすることに関しては息ぴったりですねお前ら

55 :
このスレは>>31>>47叩き基地害イコール厨等まともじゃない奴らの隔離スレだからな。

56 :
>>51
ありがとうございました
手元の資料に無かったので調べたら割と最近の仕様みたいですね

57 :
>>56
いいから二度と来るなよ

58 :
>>57
さっさと初心者を卒業しろよってことかな?
出所者を見送る看守のようだ。

59 :
>>57
来ちゃいました
テヘペロ♪

60 :
>>47はマジでクズ
2chを代理検索か何かと勘違いしてないか?

61 :
質問してこういう扱いうけて荒らしてるのかこの粘着くんはw

62 :
>>35
うまく出力されました
$|=1;とは何ですか?
改行の理由も教えてください
>>42
$|=1;をつける理由は?
lastだとループが終わってしまうので

63 :
>>32
>大きいのになぜか比較されずにスルーで何も表示されずループです
ループして困っているのか、ループしたいのか質問をはっきりしろ

64 :
>書き換えずに置換する
何をしたいのか

65 :
こういう糞みたいな質問してる連中がム板のレベルを下げてる

66 :
馬鹿の>>63-64が釣れたwww
マジ釣り掘りwwwww

67 :
>>61
荒らしは質問すらしてないよ。
質問者になりすましての煽りは入れてるが。

68 :
何で分かるの?
あ、ご本人様ですか。
荒らしもやりながらこんな場末の糞スレチェックまでご苦労様です。

69 :
プロキシのレスポンスタイム計るにはどうするの?
教えてくれ
6.5s
5,8sとかあるだろ?あれ

70 :
それはPerl限定の話でもなさそうだし、流石にWebProg板で聞いてくれ

71 :
PHPでいうマジッククォートみたいなのない?
sjisで送信するとき表とかがエスケープされずにエラーでちゃうんだけど
自動でエスケープしてくれる関数みたいなの無いの?
教えてください

72 :
自分で調べられないお前にはPHPがお似合いだ

73 :
>>71
ふたつのことを混同してしまってると思われる
「Perl XSS対策」「Perl Unicode」でそれぞれググれ
そして前者(XSS)にに関しては今後はWebProgへどうぞ

74 :
>>71=基地害

75 :
>>71
Sjisいれろ
http://search.cpan.org/~ina/Char-Sjis/

76 :
>>72-74
追い出すなって。
ここは>>71みたいな社会のゴミ用隔離スレなんだからさ。

77 :
PHPのマジッククォートとSjisっておんなじものなのか?
微妙にやること違うと思うぞw

78 :
初心者でUnicodeはきついかもな
ごちゃごちゃしてて何がなんだかさっぱり分かんない
初心者にはshiftjisがいい

79 :
Perlスレの頭にUnicode絡みのテンプレなかったっけ

80 :
require 'jcode.pl';
だっけ?

81 :
>>80
確信ないなら書くなゴミ
さっさと失せろキメェんだよ

82 :
>>9 「use Encode; 」

83 :
それ言うなら use utf8; だろ
EncodeはUnicode以外だって扱えるんだから
でも牙が伸び過ぎると自滅してしまうこともある
ttp://blog.nakatanigo.net/archives/50474313.html

84 :
>>80は頭がおかしい。

85 :
>>82
ありがとうそこにあったのか

86 :
>>80
もう来なくてもいいよ

87 :
>>80=ゴミクズ

88 :
いつもの基地外は本スレに行けよ

89 :
↑はい、いつものキチガイ入りましたー

90 :
88はいつもただの質問者を荒し扱いしたりしてる奴だろう、放置よろ。

91 :
>>80
それです。サンクスダアイナ

92 :
初心者の彼女がjacode.pl使ってて時代の変化を感じた

93 :
いつまでもEncodeでエンコしててもしょうがないしな

94 :
ttp://kotobank.jp/word/えんこ

95 :
ActivePerl5.16.1使用中です。
---
print DAT @dat;
---
このようにして配列を書き出そうとしたのですが
なぜかテキストファイルに繁栄されません。
何か情報をご存知の方いらっしゃいませんか?

96 :
ファイルハンドルであろうDATのopen文はいかに

97 :
以下の一行スクリプトに文字を食わせて「XX月◯◯日のお知らせ!」の次の行から「-----」の前までを取り出そうとしています。
最期のs/^ +//は各行の先頭の全角の空白を取ろうとしたのですが、これが働きません。が、抜き取り自体は成功していました。
逆に、use utf8とすると/正規表現/が全くひっかかりらず何もprintされません。
perl -e '
#use utf8;
while (<>)
{
if (/\d+月\d+日のお知らせ!/) { last; };
#skip the line;
};
while (<>)
{
if (/-----/) { last; };
s/^\s+//;
s/^ +//;
print;
}'

98 :
perl -e '
use utf8;
while (<>)
{
if (/\d+月\d+日のお知らせ!/) { last; };
#skip the line;
};
while (<>)
{
if (/-----/) { last; };
s/^\s+//;
{
no utf8;
s/^(?: )+//;
}
print;
}'

99 :
どうもです。
状況なのですが、use utf8すると全くおかしいです。/\d+月… /のマッチが全く成功しないので、
目的通りの結果が出ません。uset utf8しないとうまく動きます。
実はMacのautomatorから呼び出されていてGet text from Webpage actionでとってきたテキストが
このperlに渡されているのですが…UTF-8の文字が来ているはずなのですが(指定のWebページのcharsetはUTF8)。
それはさておき
( ) / (?: )
の指摘ありがとうございました。上の行のs/^\s+//;と合わせて
s/^(?:\h| |\xc2\xa0)+//;
に書き換えました。
non breakable spaceも行頭に混じっていたので、そのUTF8表現のU+c2a0も追加。
これできれいに行頭の「空白」がとれて左詰めになりました。
とりあえずuse utf8;だけ殺して一見うまく動いているのでそれで利用を開始しました。
個人の趣味の自動化目的なのでそんな感じでまずはゴーしてしまいます。

100 :
utf8プラグマは作ったひとは使うのが簡単だと考えているんだろうけど、
使うひとにとっては非常に難しい。こういった処理モデルを理解しろと
いうほうに無理がある。結論としてはutf8プラグマは使わないほうが
よい。


100〜のスレッドの続きを読む
プログラム始めたいけどrubyかPythonどっちが良い
ふらっと C#,C♯,C#(初心者用) Part143
Google Maps API 質問箱
【TDD】テスト駆動開発【TestFirst】
Visual Studio Code / VSCode Part4
将来的にPGになりたいんだが、やっぱCから?
【R】configure大嫌い【RMS】
Gtkプログラミング on Windows!!!
画像処理 15枚目
ATL/WTL Part7
--------------------
お前らが文句言っていたQR決済の乱立だが、規格統一されそう。経産省が統一に乗り出す。 [715715613]
薬球とかいう茶番
実際、名古屋大って日本の化学で最強だよな
フラッシュライト 闇を切り裂く!434ルーメン
【アイカツスターズ!】二階堂ゆずは桶桶OKダゾ可愛い Part.2
【花火】ハナビ part130【HANABI】
絵描きさん雑談スレ45
【ドキドキ!プリキュア】キュアハート/相田マナ35
入間人間総合59
【テレビ】第103回インディ500 NHK BS1 で録画放送決定 [5月27日(月)18時〜]
【広告除去】AdGuard Part1【課金者専用スレ】
【速報】茨城県で新たに感染1人 40代女性 帰国者外来があ都内の医療機関に勤務 県内4人目
☆【画像】5908
狼のPS4.PS3.Vitaその他PS総合スレ Part141
【FFBE】FINAL FANTASY BRAVE EXVIUS Lv2214【イカサマコイン】
[wii]スゴロクロニクル
些細だけど気に障ったこと Part250
【Vtuber】元おとりざ(みらとり)を懐かしむスレ84 【かるたが来りてホラを吹く】
【ナマポ】まるちーずについて語るスレ【性犯罪者】
【あなたは】戸建てvsマンション【どっち!】Part.1
TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼