Perl初心者スレ(マジレス回答)at TECH
Perl初心者スレ(マジレス回答) - 暇つぶし2ch1:デフォルトの名無しさん
12/10/07 00:48:39.00
どうぞー

2:デフォルトの名無しさん
12/10/07 00:50:26.06
このスレッドは天才チンパンジー「アイちゃん」が
言語訓練のために立てたものです。

アイと研究員とのやり取りに利用するスレッドなので、
関係者以外は書きこまないで下さい。

                  京都大学霊長類研究所


3:デフォルトの名無しさん
12/10/07 01:10:26.82
>>1
おつ!
ありがとうございます

4:デフォルトの名無しさん
12/10/07 01:46:15.82
マジレス?
じゃあ遠慮なく

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

5:デフォルトの名無しさん
12/10/07 01:55:03.21
■関連スレ

在日韓国人プログラミング
スレリンク(tech板)

チョッパリは謝罪しる!
スレリンク(tech板)

おちんちんを入れてください
スレリンク(tech板)

ほむらたんをあいしてる
スレリンク(tech板)

我らPGにしてPGにあらず
スレリンク(tech板)

おちんちんを入れる
スレリンク(tech板)

6:デフォルトの名無しさん
12/10/07 01:56:03.28
■関連スレその2

カチャカチャPGの叫び
スレリンク(tech板)

プログラマー=キチガイ
スレリンク(tech板)

チンパンジーの舞
スレリンク(tech板)

今、ム板に必要なのはIDより板の設定変更
スレリンク(tech板)

こんにちはみなさん。
スレリンク(tech板)

7:デフォルトの名無しさん
12/10/07 02:35:42.93
>>1
基地害乙

8:デフォルトの名無しさん
12/10/07 10:56:38.94
初心者なので CGI と Perl の区別がつかないこともあると思いますが、
どうぞ質問してください。
スレ違いの質問にはスルーか、速やかな誘導をお願いします。
回答者が現れるまで待ちましょう。

[プログラミング自体の経験が無いひとはまずココを読む]
とほほのperl入門: URLリンク(www.tohoho-web.com)

[厳選・オンラインドキュメント]
perldoc.jp: URLリンク(perldoc.jp)
Perl メモ: URLリンク(www.din.or.jp)
Perl のページ: URLリンク(homepage1.nifty.com)
Perl の小技: URLリンク(homepage3.nifty.com)


9:デフォルトの名無しさん
12/10/07 11:01:39.61
# [Perl 日本語処理の基礎の基礎]
# まず、以下の行を先頭に入れて下さい。

use utf8;
use open IO => ":encoding(cp932)";
binmode STDIN => ":encoding(cp932)";
binmode STDOUT => ":encoding(cp932)";
binmode STDERR => ":encoding(cp932)";
use Encode;

# 以上の内容は、日本語処理が解らない人でも、とりあえず日本語処理ができてしまう
# おまじないです。


10:デフォルトの名無しさん
12/10/07 11:07:51.43
上記の記述は1行で書くこともできます。

use encoding 'cp932'; # [Perl 日本語処理]

初心者にはこれが一番あってると思います。
徐々に経験を積んで、難しい記述にチャレンジしていきましょう。

11:デフォルトの名無しさん
12/10/07 14:00:31.86
そもそもプログラム初心者にPerl選択などありえない

12:デフォルトの名無しさん
12/10/07 17:42:36.30
初めてのPerl第6版と赤らくだ本は分量的にも内容的にもほぼ同じだしな

13:デフォルトの名無しさん
12/10/07 19:28:07.17
ここは本スレではありません。
こちらへどうぞ。

Perlについての質問箱 56箱目
スレリンク(tech板)

14:デフォルトの名無しさん
12/10/07 21:24:43.64
↑ながらく機能していない上にCGIの質問をすると怒られます。
 Perlの質問をするとPHPの回答が返ってきます。
 それでも構わないなら、どうぞ。

15:デフォルトの名無しさん
12/10/07 21:30:12.99
やっぱりPHPの方がいいんですかね。

16:デフォルトの名無しさん
12/10/07 21:56:55.72
プログラム初心者じゃなくてPerl初心者な。PHPは卒業な。

17:デフォルトの名無しさん
12/10/07 22:29:39.78
■関連スレ

おちんちんランド開園
スレリンク(tech板)

ム板を荒らしている連中の正体
スレリンク(tech板)

おちんちんを舐めよう
スレリンク(tech板)

ム板住民に言いたい1000のこと
スレリンク(tech板)

低級言語のすばらしさ
スレリンク(tech板)

 
スレリンク(tech板)

ム板の住民構成
スレリンク(tech板)

18:デフォルトの名無しさん
12/10/07 23:09:44.68
PHPでいう、in_arrayは
Perlではなんて関数ですか?

19:デフォルトの名無しさん
12/10/07 23:44:10.62
grepでいいんじゃないか?UNIXの文化な

20:デフォルトの名無しさん
12/10/07 23:45:55.55
>>19
ありがとうございます。
それからもうひとつ、
array_uniqueに相当する関数はどれでしょうか?

21:デフォルトの名無しさん
12/10/08 00:16:19.24
ハッシュのキーにして、最後にキーを取り出す

22:デフォルトの名無しさん
12/10/08 00:29:08.71
my %uniq = map { $_ => 1 } @array;
my @array_uniq = keys %uniq;


23:デフォルトの名無しさん
12/10/08 00:37:42.34
長いな。

24:デフォルトの名無しさん
12/10/08 01:25:04.19
初心者に変なもん奨めるんじゃないぞ

25:デフォルトの名無しさん
12/10/08 01:37:02.22
%u = map {$_,1} @a;
@u = keys %u;
#チヂメテミタ

26:デフォルトの名無しさん
12/10/08 10:06:15.64
my @array_unique = keys %{{map {$_,1} @array}};

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

27:デフォルトの名無しさん
12/10/08 11:07:41.23
ひと頃List::Utilが湧いたのはPHPとの比較が原因か

28:デフォルトの名無しさん
12/10/08 13:27:23.56
>>26
なんかバッドノウハウ臭が強いな。

29:デフォルトの名無しさん
12/10/08 14:21:09.99
んなこたあない。

30:デフォルトの名無しさん
12/10/08 14:24:32.17
ここでList::Utilを持ち出し、直後からスレが荒れるのが定番。

31:デフォルトの名無しさん
12/10/08 14:31:44.97
あるサイトにアクセスして数値を取得してreturn $num;で値を返す関数を作ったとします
get_num();

my $num=200
while(1)
{
if(new_num() >=$num)
{
okと表示
}
}

okがうまく表示されません
毎回get_numでサイトにアクセスして取得しているというのが悪いんでしょうか?原因がわかりません教えてください


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

33:デフォルトの名無しさん
12/10/08 14:39:56.54
>あるサイトにアクセスして数値を取得してreturn $num;で値を返す関数を作ったとします
↑これは get_num() のことですか?new_num() のことですか?

get_num() は return $num; しないんですか?戻ってきた値は使わないんですか?

>毎回get_numでサイトにアクセスして
↑ get_num() は while の中にありませんが、この外にループがあるんですか?

34:デフォルトの名無しさん
12/10/08 14:43:57.35
use strict; 落ちか

腕を上げたようだな、モダンPerl。

35:Perl忍者 ◆M5ZWRnXOj6
12/10/08 14:44:44.21
>>31
$|=1;
それかprint "ok\n";
改行いれとけ

36:デフォルトの名無しさん
12/10/08 14:46:12.89
改行入れてもループは終わらんだろw

37:デフォルトの名無しさん
12/10/08 15:14:18.81
>>31
マジレスすると
お前みたいな低脳には無理

38:デフォルトの名無しさん
12/10/08 15:34:01.73
荒らしの連立てしたスレを伸ばそうとしてる>>31は荒らし
消えろやゴミが

39:デフォルトの名無しさん
12/10/08 15:43:26.69
>>37=>>38

40:デフォルトの名無しさん
12/10/08 16:04:33.60
>>37=>>38=>>39

41:デフォルトの名無しさん
12/10/08 16:16:12.31
>>31=>>39

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

43:デフォルトの名無しさん
12/10/08 18:01:11.94
なんで>>31みたいなカスがプログラミングなんかに手を出したのか疑問。

44:デフォルトの名無しさん
12/10/08 18:06:38.78
>>43
そんなのが疑問になるのは
お前が馬鹿だからじゃないだろうか。

45:デフォルトの名無しさん
12/10/08 18:11:25.50
>>43=>>44=>>37=>>38

46:デフォルトの名無しさん
12/10/08 18:20:57.42
>>43=>>44=>>37=>>38=>>31=>>45

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

48:デフォルトの名無しさん
12/10/08 19:10:50.54
>>47
寝言は寝て言えキチガイ

49:デフォルトの名無しさん
12/10/08 19:13:40.44
>>44=>>48

50:デフォルトの名無しさん
12/10/08 19:24:24.71
>>47のような害虫はム板から駆除しなければならない。

51:デフォルトの名無しさん
12/10/08 19:35:47.99
>>47
s/// に /r を指定するとよろし

52:デフォルトの名無しさん
12/10/08 19:47:46.05
>>47
演算子一覧くらい検索すればいくらでも出てくるだろ

それすら検索できないって本物の精神異常?

53:デフォルトの名無しさん
12/10/08 19:56:47.23
>>47はプログラミングに向いてない。

54:デフォルトの名無しさん
12/10/08 20:15:10.88
煽り叩きに加えて今度はイコール厨まで参戦ですか
ほんとスレの空気を悪くすることに関しては息ぴったりですねお前ら

55:デフォルトの名無しさん
12/10/08 20:23:58.30
このスレは>>31>>47叩き基地害イコール厨等まともじゃない奴らの隔離スレだからな。

56:デフォルトの名無しさん
12/10/08 20:35:31.31
>>51
ありがとうございました
手元の資料に無かったので調べたら割と最近の仕様みたいですね

57:デフォルトの名無しさん
12/10/08 20:43:06.24
>>56
いいから二度と来るなよ

58:デフォルトの名無しさん
12/10/08 20:48:41.51
>>57
さっさと初心者を卒業しろよってことかな?
出所者を見送る看守のようだ。

59:デフォルトの名無しさん
12/10/08 20:49:06.45
>>57
来ちゃいました
テヘペロ♪

60:デフォルトの名無しさん
12/10/08 22:37:14.94
>>47はマジでクズ
2chを代理検索か何かと勘違いしてないか?

61:デフォルトの名無しさん
12/10/08 22:47:29.05
質問してこういう扱いうけて荒らしてるのかこの粘着くんはw

62:31
12/10/08 23:31:22.78
>>35
うまく出力されました
$|=1;とは何ですか?
改行の理由も教えてください

>>42
$|=1;をつける理由は?
lastだとループが終わってしまうので

63:デフォルトの名無しさん
12/10/08 23:37:12.37
>>32
>大きいのになぜか比較されずにスルーで何も表示されずループです

ループして困っているのか、ループしたいのか質問をはっきりしろ

64:デフォルトの名無しさん
12/10/08 23:46:28.06
>書き換えずに置換する

何をしたいのか

65:デフォルトの名無しさん
12/10/08 23:58:56.98
こういう糞みたいな質問してる連中がム板のレベルを下げてる

66:デフォルトの名無しさん
12/10/09 01:13:51.30
馬鹿の>>63-64が釣れたwww
マジ釣り掘りwwwww

67:デフォルトの名無しさん
12/10/09 03:50:12.06
>>61
荒らしは質問すらしてないよ。
質問者になりすましての煽りは入れてるが。

68:デフォルトの名無しさん
12/10/09 11:14:53.75
何で分かるの?
あ、ご本人様ですか。
荒らしもやりながらこんな場末の糞スレチェックまでご苦労様です。

69:デフォルトの名無しさん
12/10/09 13:42:01.38
プロキシのレスポンスタイム計るにはどうするの?
教えてくれ
6.5s
5,8sとかあるだろ?あれ

70:デフォルトの名無しさん
12/10/09 14:26:59.97
それはPerl限定の話でもなさそうだし、流石にWebProg板で聞いてくれ

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

72:デフォルトの名無しさん
12/10/09 16:57:01.82
自分で調べられないお前にはPHPがお似合いだ

73:デフォルトの名無しさん
12/10/09 17:05:55.35
>>71
ふたつのことを混同してしまってると思われる
「Perl XSS対策」「Perl Unicode」でそれぞれググれ
そして前者(XSS)にに関しては今後はWebProgへどうぞ

74:デフォルトの名無しさん
12/10/09 17:13:03.31
>>71=基地害

75:Perl忍者 ◆M5ZWRnXOj6
12/10/09 17:33:58.22
>>71
Sjisいれろ
URLリンク(search.cpan.org)

76:デフォルトの名無しさん
12/10/09 17:49:33.02
>>72-74
追い出すなって。
ここは>>71みたいな社会のゴミ用隔離スレなんだからさ。

77:デフォルトの名無しさん
12/10/09 20:44:10.43
PHPのマジッククォートとSjisっておんなじものなのか?
微妙にやること違うと思うぞw

78:デフォルトの名無しさん
12/10/09 22:09:35.85
初心者でUnicodeはきついかもな
ごちゃごちゃしてて何がなんだかさっぱり分かんない
初心者にはshiftjisがいい

79:デフォルトの名無しさん
12/10/10 00:13:36.93
Perlスレの頭にUnicode絡みのテンプレなかったっけ

80:デフォルトの名無しさん
12/10/12 00:36:02.70
require 'jcode.pl';

だっけ?

81:デフォルトの名無しさん
12/10/12 01:02:04.55
>>80
確信ないなら書くなゴミ
さっさと失せろキメェんだよ

82:デフォルトの名無しさん
12/10/12 01:03:01.58
>>9 「use Encode; 」

83:デフォルトの名無しさん
12/10/12 01:38:15.26
それ言うなら use utf8; だろ
EncodeはUnicode以外だって扱えるんだから

でも牙が伸び過ぎると自滅してしまうこともある
URLリンク(blog.nakatanigo.net)

84:デフォルトの名無しさん
12/10/12 02:28:37.13
>>80は頭がおかしい。

85:デフォルトの名無しさん
12/10/12 02:37:31.52
>>82
ありがとうそこにあったのか

86:デフォルトの名無しさん
12/10/12 03:28:56.95
>>80
もう来なくてもいいよ

87:デフォルトの名無しさん
12/10/12 12:02:40.96
>>80=ゴミクズ

88:デフォルトの名無しさん
12/10/12 15:53:07.74
いつもの基地外は本スレに行けよ

89:デフォルトの名無しさん
12/10/12 18:49:11.85
↑はい、いつものキチガイ入りましたー

90:デフォルトの名無しさん
12/10/12 21:16:15.75
88はいつもただの質問者を荒し扱いしたりしてる奴だろう、放置よろ。

91:デフォルトの名無しさん
12/10/28 18:01:11.94
>>80
それです。サンクスダアイナ

92:デフォルトの名無しさん
12/10/28 20:13:19.68
初心者の彼女がjacode.pl使ってて時代の変化を感じた

93:デフォルトの名無しさん
12/10/31 00:29:58.66
いつまでもEncodeでエンコしててもしょうがないしな

94:デフォルトの名無しさん
12/11/06 01:38:15.62
URLリンク(kotobank.jp)えんこ

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

96:デフォルトの名無しさん
12/11/13 05:02:27.13
ファイルハンドルであろうDATのopen文はいかに

97:デフォルトの名無しさん
12/11/13 22:13:06.51
以下の一行スクリプトに文字を食わせて「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:デフォルトの名無しさん
12/11/13 22:28:35.29
perl -e '
use utf8;
while (<>)
{
if (/\d+月\d+日のお知らせ!/) { last; };
#skip the line;
};
while (<>)
{
if (/-----/) { last; };

s/^\s+//;
{
no utf8;
s/^(?: )+//;
}
print;
}'

99:デフォルトの名無しさん
12/11/16 00:37:30.32
どうもです。
状況なのですが、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:デフォルトの名無しさん
12/11/16 00:44:04.42
utf8プラグマは作ったひとは使うのが簡単だと考えているんだろうけど、
使うひとにとっては非常に難しい。こういった処理モデルを理解しろと
いうほうに無理がある。結論としてはutf8プラグマは使わないほうが
よい。

101:デフォルトの名無しさん
12/11/16 14:34:35.11
もう省略の美学とか無くていいから(涙)
ぜんぜん意味がわからない
たすけて

102:デフォルトの名無しさん
12/11/16 21:20:57.16
utf8にはまるのは日本固有らしい。海外では当初から見切りをつけていて
使われることはない。

103:デフォルトの名無しさん
12/11/17 00:49:53.31
この方法で重複を削除した場合
リストの順番は変更されますか。
それとも、重複が削除されるだけで、
順番はそのままですか。

my %hash = ();
foreach (@list) {
$hash{$_}++;
}
my @unique = keys %hash;
print @unique;

ご教示ください。

104:デフォルトの名無しさん
12/11/17 01:33:36.49
The keys of a hash are returned in an apparently random order.
ハッシュのキーはランダムな順番で返されます(適当訳)
URLリンク(perldoc.perl.org)

105:デフォルトの名無しさん
12/11/17 01:55:32.07
ゲーッ
ありがとうございました・・・

106:デフォルトの名無しさん
12/11/17 17:04:11.19
フリーソフトの利用は自己責任。
utf8作ったひとが助けてくれるわけじゃない。
自分の理解できる範囲内で使えってこった。

107:デフォルトの名無しさん
13/01/03 08:49:11.83
文字コードとしてのUTF-8を理解してもutf8プラグマの挙動は別物
オレオレ実装むき出しの仕様で理解できず使いづらい
そこで省略の美学になる

108:デフォルトの名無しさん
13/01/03 09:02:50.69
至らない実装は利用者が補えるが、オレオレ仕様は直せない、か

109:デフォルトの名無しさん
13/01/05 20:10:35.16
2chのソースコード読みたい
どっかに落ちてないかな?

110:デフォルトの名無しさん
13/01/06 06:16:44.13
クレクレ厨か糞がキメェんだよ

111:デフォルトの名無しさん
13/01/07 23:54:06.18
KENT本の中に似た外見のBBSってなかったっけ?

112:デフォルトの名無しさん
13/01/08 01:05:42.37
「?」じゃねーだろ確認して書き込めやゴミが

113:デフォルトの名無しさん
13/01/08 01:51:30.58
>>112
おまえ、うるさい!!

114:デフォルトの名無しさん
13/01/08 05:40:51.47
>>112
糞スレ乱立してた基地害が立てたスレの一つで何言ってんの?
ここは落書き帳だよ?

115:デフォルトの名無しさん
13/01/09 00:11:00.04
www.kent-web.com/bbs/
「2ch風」のマルチスレッド式掲示板です。トリップ機能、age/sage機能、
ID表示機能などが可能です。また表示部分をテンプレートファイルとし、
ユーザサイドでのレイアウト改造やデザイ改造が容易です。

116:デフォルトの名無しさん
13/01/09 17:34:57.36
サイトの宣伝乙

117:デフォルトの名無しさん
13/01/10 16:07:28.37
>>115
宣伝ウザい

118:デフォルトの名無しさん
13/01/11 05:12:28.86
>>115
こんなところに来てまでステマとかマジで気持ち悪いよお前
アタマおかしいんじゃねーの

119:デフォルトの名無しさん
13/01/12 01:08:29.34
>>109に回答するのが初心者スレのみっちょんだから

120:デフォルトの名無しさん
13/01/12 03:52:42.37
CGIの紹介はスレ違い
本当にここには基地害しか残ってないんだな

121:デフォルトの名無しさん
13/01/12 10:20:36.14
>>120
残って?
スレ間違えてますよ

122:デフォルトの名無しさん
13/01/12 17:34:17.42
>>120
お前、CGI知らないのか?
Common Gateway Interface(コモン・ゲートウェイ・インタフェース、
CGI)は、ウェブサーバ上でユーザプログラムを動作させるための仕組み。

件の掲示板を実現しているプログラムはPerlスクリプトだぞ?
CGIとPerlスクリプトの違いも分からないのか?

123:デフォルトの名無しさん
13/01/12 19:33:15.48
>>122の言ってることは分かるがなぜここでそれを言うのか分からない。

124:デフォルトの名無しさん
13/01/12 19:43:06.23
ここはゴミの隔離スレだからね

125:デフォルトの名無しさん
13/01/12 21:38:40.14
>>123
落書き帳と同じだから必ずしも会話が成立してる必要はないんだよ

発作的に書きたくなった内容を書き殴ればいい

このスレにいるのは心を病んでる奴がほとんどだからまともに相手してるとこっちまで病むぞ

126:デフォルトの名無しさん
13/01/13 23:14:20.80
>>120
ばかだな、お前以外におれがいることを忘れているぞ

127:デフォルトの名無しさん
13/01/19 03:12:42.05
アルパカ本ってどうよ?
リャマ本ほど人気ないみたいだけど

128:デフォルトの名無しさん
13/01/19 23:32:55.48
リャマ本をこなしてアルパカ本に進むわけだから当然脱落者がいるわな

リャマ本⇒らくだ本⇒アルパカ本

129:デフォルトの名無しさん
13/01/20 00:04:13.22
>>128
え?
らくだ本が間に入る?
あれは上級者向きの本だお

130:デフォルトの名無しさん
13/01/20 04:06:34.04
うるさいゴミ
お前が勝手に勘違いしてるだけだクズ
キメェから勘違い野郎は書き込むな

131:デフォルトの名無しさん
13/01/20 05:48:09.14
はたして>>124>>130のどちらが正しいのか

132:デフォルトの名無しさん
13/01/20 08:48:48.95
このスレ、気持ち悪いな
Perl使いにも、>>130みたいな気持ち悪い奴が多いから納得

133:デフォルトの名無しさん
13/01/20 09:24:26.74
荒らしが立てたスレだしな。
本スレはこっち。

Perlについての質問箱 57箱目
スレリンク(tech板)

134:デフォルトの名無しさん
13/01/20 13:19:52.11
そもそも今のム板にPerlスレ立てること自体荒らし行為

135:デフォルトの名無しさん
13/01/20 14:10:46.15
WEBプログラミング@2ch掲示板でも荒らされてるぞ

3 名前:nobodyさん 投稿日:2013/01/19(土) 02:52:02.33 ID:???
カップ麺スレ増殖中・・・


4 名前:nobodyさん 投稿日:2013/01/19(土) 03:47:52.32 ID:???
とんこつ系のインスタント麺で一番旨いのってどれだろう?
あのカップに入ってるちょっと高めのやつって実は値段ほど美味しくない

スレリンク(php板:3-4番) Perlコーディング初心者質問スレ Part 67

136:デフォルトの名無しさん
13/01/20 14:12:27.88
WEBプログラミング@2ch掲示板でも荒らされてる

3 名前:nobodyさん 投稿日:2013/01/17(木) 04:27:37.19 ID:???
またラーメンスレかw


5 名前:nobodyさん 投稿日:2013/01/18(金) 23:16:14.71 ID:???
>>4
どうせ暇でしょ?
全てのスレを食べ物の話題で
埋めたらいいやん?

スレリンク(php板:3-5番) Perlコーディング初心者質問スレ Part 66

137:デフォルトの名無しさん
13/01/20 14:13:55.60
WEBプログラミング@2ch掲示板でも



4 名前:nobodyさん 投稿日:2013/01/16(水) 03:05:27.12 ID:???
カップ麺スレ


5 名前:nobodyさん 投稿日:2013/01/16(水) 04:54:54.33 ID:???
<前スレで出た話題>
カップラーメン
カップ焼きそば
ユーリンチー
カレー
水分の多い食品に揚げ物を入れる件
くずもち

その他詳細などについては>>1のリンクを参照


6 名前:nobodyさん 投稿日:2013/01/16(水) 20:45:34.73 ID:???
高級な料理や食品に関しての話題が出ないわけだがw

スレリンク(php板:4-6番) Perlコーディング初心者質問スレ Part 65

138:デフォルトの名無しさん
13/01/20 14:17:41.02
WEBプログラミング@2ch掲示板で
631 名前:nobodyさん 投稿日:2013/01/14(月) 19:39:50.81 ID:???
>>627
ちゃんとしたワンタンを加えるともっと旨くなるぞ


632 名前:nobodyさん 投稿日:2013/01/14(月) 23:23:04.38 ID:???
餃子とかでいいんじゃね


633 名前:nobodyさん 投稿日:2013/01/14(月) 23:42:44.97 ID:???
ラーメン屋のラーメンに入ってるチャーシューとスーパーで売ってるチャーシューって全然違うよな。
スーパーで買ってきたチャーシューってハムとラーメン屋のチャーシューの中間っぽい。
スーパーで普通のチャーシューも売って欲しいわ。


634 名前:nobodyさん 投稿日:2013/01/15(火) 17:00:15.77 ID:+UlCw0lP
お前らってラーメン+ライスとかいける派?
俺はとんこつラーメンに限りいける


635 名前:nobodyさん 投稿日:2013/01/18(金) 19:15:41.39 ID:???
お好み焼きをおかずにご飯を食べる人種もいるらしい。

スレリンク(php板:631-635番) Perlコーディング初心者質問スレ Part 64

139:デフォルトの名無しさん
13/01/20 21:56:15.25
Perl自体がオワコンなのにスレを立てることが間違ってる。
特に新しくPerlを学ぼうなんて正気の沙汰じゃないんだから初心者スレは不要。
せいぜい昔のPerlで作られたシステムの保守をやらされてるSE土方が情報交換するくらいだろ。

140:デフォルトの名無しさん
13/01/21 00:12:29.99
昔のPerlも覚えられず、かといって新しいPerlも覚えられない。
悔しいんですね?分かります。

141:デフォルトの名無しさん
13/01/22 06:03:34.12
あのぷっくりサスペンダーのおじさんもオワコンなの?最近見ないけど

142:デフォルトの名無しさん
13/01/22 07:05:37.78
Perl最強

143:デフォルトの名無しさん
13/01/22 21:07:00.40
荒らしが立てたスレ

144:デフォルトの名無しさん
13/01/22 23:00:03.67
古いPerlだと新しいソフトが書けないと考えるひとがいるようですね。
たいした仕事できなさそう。

145:デフォルトの名無しさん
13/01/23 01:43:22.70
どっちにしてもPerlはオワコン
PHPがここまで進化しちゃうとPerlの存在価値はどこにあるんでちゅかねーw

146:デフォルトの名無しさん
13/01/23 01:52:30.08
>>145
ワンライナー

147:デフォルトの名無しさん
13/01/23 04:53:44.35
ごった煮の点で、PHPもPerlににている → Perlとおなじような運命だろう

148:デフォルトの名無しさん
13/01/23 05:58:31.38
PHPっていうとWebアプリしか書けないイメージがある
PerlはC言語/シェルスクリプトが担っていた分野をカバーしているので
今後も使われていくだろう
Perlがオワコン説は単に初心者プログラマの脱落を意味しているだけで
もともと使っていたシステム管理者らが使うのをやめることはない

149:デフォルトの名無しさん
13/01/24 17:21:48.69
PerlっていうとWebアプリしか書けないイメージがある
PHPは当初よりかなり進化しているので
今後も使われていくだろう
Perlがオワコン説は初心者プログラマがPerlを選らばないとう現実を意味しているから
もともと使っていた老害が使い続けるだけという結末になる

150:デフォルトの名無しさん
13/01/24 21:48:04.27
PerlもPHPもどちらも書いてると、PHPの方がクソだと思えてくる。

151:デフォルトの名無しさん
13/01/25 00:32:34.81
Perlっていうとぷっくりサスペンダーのおじさんのイメージがある
ときどきアニメを例えに使うあのなぞなぞ好きなおじさんだ
甲高い声が人気なので今後も使われていくだろう
Perlがオワコン説はWindowsユーザがPerlを選ばなくなったとう現実を意味しているから
もともと使っていたJperlを使い続けるしかないということになる

152:デフォルトの名無しさん
13/01/27 11:34:47.69
perlからC言語で作った実行ファイルを実行するときC言語のソースが

printf("A");
scanf(); ---Bを入力
printf("C");

のときにこの実行ファイル実行結果ををperlで受け取るときperl側で
ACとなってしまいます。
これを
AB
C
として受け取りたいのですがどうすればいいでしょうか?

153:デフォルトの名無しさん
13/01/27 13:15:02.04
>>152
scanf()で受け取った文字列をprintf()してはダメなの?

154:デフォルトの名無しさん
13/01/27 13:42:25.19
>>152
自分で調べろよゴミが
そもそもここはスレ立て荒らしが立てたスレだ

155:デフォルトの名無しさん
13/01/27 14:22:43.67
>>152
お前みたいな馬鹿にプログラム組んでもらわなくても誰も困らないからさっさと回線切れ。

156:デフォルトの名無しさん
13/01/27 23:46:32.04
なんで自分で調べられないん?

157:デフォルトの名無しさん
13/01/28 11:00:02.92
>>152
基礎もできてないゴミの癖にうざい

158:デフォルトの名無しさん
13/01/29 21:18:44.13
futomi's CGI Cafeの「清き一票!(投票CGI)」というフリーのCGIを元に投票項目を増やしたいのですが、HTMLの方で増やしたname属性をCGIの方に反映させる方法がわかりません。

もう2週間ほどPerlについて書いてあるページを調べ回りながら試行錯誤を繰り返しているのですが、どこをどういじればいいのかよくわかりません...

ヒントだけでもいいので教えてください。お願いします。

159:デフォルトの名無しさん
13/01/29 21:29:31.69
何で作った奴にきかずに赤の他人にきいてんだ?
しかもタダで教えろとか本当にゴミだなお前。

回線切れ乞食。

160:デフォルトの名無しさん
13/01/29 21:37:22.44
>>159
すみません。
2004年に配布されたもので結構昔のものなので製作者様の方に教えてもらうことができなくて、ここなら何かヒントになることだけでも教えていただけると思ったので...

161:デフォルトの名無しさん
13/01/29 22:19:55.44
>>160
Perlを最初から勉強すればすむ話だろゴミ
それにそれが情報乞食をする理由になるの?
本当に乞食じゃねぇのこいつ

162:デフォルトの名無しさん
13/01/29 22:30:06.20
>>160
Perlを使いこなすために書籍に何万と投資をし、書籍を読んだりコードを書いたりするのに何年と時間を投資し、
そうやって身に付けたものをお前みたいなクズにタダで使う理由は?

163:デフォルトの名無しさん
13/01/30 01:17:52.20
投票項目の多いCGIプログラムを入手するのが目的なのか、Perlのスキルを
高めたいのかどっちなんだ?

164:デフォルトの名無しさん
13/01/30 01:24:07.81
READMEに全部書いてあったわ、ネタか

165:158
13/01/30 02:59:15.11
思ったほど釣れなかった

166:デフォルトの名無しさん
13/01/31 19:36:40.96
いつものキチガイしかいないしな

167:デフォルトの名無しさん
13/01/31 23:38:52.70
Perlの本質

168:デフォルトの名無しさん
13/02/03 23:45:45.37
モダンPerlの本質、な。そこ混同しないように。

169:デフォルトの名無しさん
13/03/01 00:35:14.22
モダンPerlを勧めるひとは熱心なあまりキチガイみたいに見えてしまうってこと?
でも本来のキチガイとは違って、モダンPerlやめれば症状が改善されるんだよね?

170:デフォルトの名無しさん
13/03/01 04:28:53.25
>>169
ゴミは黙ってろ

171:デフォルトの名無しさん
13/03/02 01:42:04.04
改善された例を見たことがない。キチガイは自滅してオワコンだ。

172:デフォルトの名無しさん
13/03/06 14:29:08.45
俺は間違っちゃいない!世界が間違ってるんだ!
永遠に叫び続ければいいよ。

173:デフォルトの名無しさん
13/12/27 05:55:34.37
perl覚えたけど使い道が無い

174:デフォルトの名無しさん
13/12/30 19:13:23.07
Sublime2 TextからPerl実行出来るようにしてるが頗る便利
テキストの処理がいつでも出来る
それとフォルダ毎にzip圧縮するときなんかに使ってるわ
D&Dするようなアプリだとフォルダまとめて圧縮しちまうからな

175:デフォルトの名無しさん
14/01/18 19:07:08.88
print は引数を省略できるけど、
join は引数を省略できない

どの関数は どの引数を省略できるのか
省略した時はなにがあてはまるのか

の標準関数の分の一覧ってある?

176:デフォルトの名無しさん
14/01/25 08:40:46.49
ぬおおperldoc.jpさんありがとおおお!!

177:デフォルトの名無しさん
14/01/25 14:34:38.45
プログラミングPerl 改訂版 ママゾンだと1円です

178:デフォルトの名無しさん
14/01/25 20:50:09.90
>>176
Twitterでやれ低知能

179:デフォルトの名無しさん
14/02/02 03:06:31.84
標準出力を乗っ取る機能ある?
普通にprintしてもフィアルに書き出すみたいなやつ

180:デフォルトの名無しさん
14/02/02 03:11:10.25
>>179
それって普通リダイレクトでやるもんじゃないの?

そもそも標準出力=「画面とは限らない」ものなんだから

181:デフォルトの名無しさん
14/02/02 03:20:11.89
そもそもフィアルってなんだ?
異次元デバイス?

182:デフォルトの名無しさん
14/02/02 07:25:47.08
>>179
あるよ

183:デフォルトの名無しさん
14/02/02 14:32:34.15
質問かと思ったらただの精神異常だった件。

184:デフォルトの名無しさん
14/02/02 19:33:16.71
>>179
URLリンク(perldoc.jp)

185:179
14/02/02 20:46:01.69
>>182
ありがとう
STDOUTだったわ

186:デフォルトの名無しさん
14/02/03 00:53:32.45
>>185
二度と来るな

187:デフォルトの名無しさん
14/02/13 00:44:22.79
ただの不備を精神異常とか二度と来るなとか罵るのもどうなのよ
だから過疎ってんだよ

188:デフォルトの名無しさん
14/02/13 01:00:25.87
という精神異常者の意見。

189:デフォルトの名無しさん
14/02/13 06:54:32.76
>>187
Perl関連スレ、何故か荒らしが住み着いてるからなあ

190:デフォルトの名無しさん
14/02/15 03:29:16.57
自分が昔書いたプログラムの
a{\%$b}=c
の意味がわかりません

191:デフォルトの名無しさん
14/02/15 03:31:13.19
失礼しました正確には
$self->{a}{\%$b}=$c
でした。助けてください。

192:デフォルトの名無しさん
14/02/15 04:51:13.29
>>190-191
マジレススレだからマジレスすると、書き込み前の確認すらできないほど頭の悪い奴にプログラミングは向いてない。
早く回線切れ。

193:デフォルトの名無しさん
14/02/15 06:01:06.70
ごみがまたパールの保守性の低さを証明してくれましたw

PHPだとこういった事態の発生する可能性がパールより低い

保守性を考えるならPHP

194:デフォルトの名無しさん
14/02/15 11:17:17.47
>>190
ウザい

195:デフォルトの名無しさん
14/02/15 13:45:31.98
Perlの場合は、保守性を考えると非・オブジェクト指向のほうがいいよ
 $self->{a}{\%$b}=$c
は分かりやすくすると
 $self->{'a'}->{$b} = $c
になる
ただ $b は本当にハッシュのリファレンスなの?

196:デフォルトの名無しさん
14/02/15 13:54:50.01
質問に質問で返す愚図

197:デフォルトの名無しさん
14/02/15 14:05:22.33
>>195はコードも読めないのに住み着いてるのか・・・

198:デフォルトの名無しさん
14/02/15 14:22:08.60
あ、>>195であってたw、俺が読めてなかった、ごめんw

199:デフォルトの名無しさん
14/02/15 14:42:56.54
最近はこういう有象無象しかいないの?

200:デフォルトの名無しさん
14/02/15 14:53:47.23
>>195を貶めてる奴らも
回答できてない時点で同レベル

201:デフォルトの名無しさん
14/02/15 14:56:05.17
Perlなんか使ってる時点でw

☆統計開始以降利用人口史上最低記録絶賛更新中☆
URLリンク(www.tiobe.com)

202:デフォルトの名無しさん
14/02/15 17:11:49.28
ちろべとかどうせ海外の話でしょ、ひまわりが載ってないしw

203:デフォルトの名無しさん
14/02/15 17:18:51.05
韓国も入ってないだろうな。
韓国ではRubyよりPerlのほうが圧倒的に人気だから
そんなIT人口の多いIT先進国のデータが入ってたら絶対Perlのほうが上位に来るよ。

204:デフォルトの名無しさん
14/02/15 20:49:43.46
韓国では何をきっかけにPerl人口が増えたの?例えばO'Reillyとかは韓国語版を
出していないよね?韓国のひとは何を使って勉強したの?教えてえろいひと

205:デフォルトの名無しさん
14/02/15 21:42:43.14
>>195
ありがとうございます。それをヒントに少し思い出してきたかも。

206:デフォルトの名無しさん
14/02/15 22:15:24.73
こういうクズがコミュニティの足引っ張ってんだよな

207:デフォルトの名無しさん
14/02/15 22:32:20.62
>>205
迷惑がられてる自覚はないわけね。

208:デフォルトの名無しさん
14/02/15 22:34:34.38
そう言ってるだけのお前も迷惑がられてる自覚はないわけね

209:デフォルトの名無しさん
14/02/15 23:02:19.74
荒らせればオウム返しでも何でもいいんだな

210:デフォルトの名無しさん
14/02/15 23:18:36.63
俺も荒らし…まあそうだろうなあ、自覚は無いようだけどお前も荒らしだよ?

211:デフォルトの名無しさん
14/02/15 23:27:26.42
ここは常に罵りあってる気持ちのよいスレッドですね
初心者も質問しやすくて大変良い雰囲気だと思います

212:デフォルトの名無しさん
14/02/16 00:15:49.07
>>190みたいな奴がそうなるように
仕向けてるんだよ。

213:デフォルトの名無しさん
14/02/16 00:43:26.71
リファレンスをハッシュのキーに使ってもいいの?何か間違えてない?

214:デフォルトの名無しさん
14/02/16 00:51:25.65
>>213
ドキュメントも読めないのかゴミ

215:デフォルトの名無しさん
14/02/16 00:58:35.57
そもそもPerlを選択する時点でかなり間違えちゃってるから別にいいんじゃね?w
大元で間違ってるのに枝葉の間違いばかり気にする馬鹿ってたまにいるよな。

中国産の野菜は農薬が酷いが、中国産のキャベツと中国産の白菜のどっちが安全か考える馬鹿。
そもそも中国産の野菜を選ぶ時点で間違ってると気付かない馬鹿。

低所得で納税額の少ない社会のお荷物に多い傾向。

216:デフォルトの名無しさん
14/02/16 01:09:56.43
>>215
馬鹿というより向上心がないんでしょ
一つ言語を覚えたらそこに落ち着いてしまうタイプだと思われ

217:デフォルトの名無しさん
14/02/16 01:49:27.33
向上心のない奴は何やっても駄目、他人に懇切丁寧に教えてもらって半人前とかね
居残りさせられて先生がつきっきりで人一倍教えてるのに50点しか取れない奴いただろ

218:デフォルトの名無しさん
14/02/16 09:18:13.70
新たにPerl覚える人間が居ないとでも?
良く出来たツールだと思うよ、ホント

219:デフォルトの名無しさん
14/02/16 13:55:54.78
Perlを覚えられないひとのためにできたのがPHP。PHPはPerlの機能限定版。
だからCGIにしか使えない。

220:デフォルトの名無しさん
14/02/16 13:59:57.82
流石に、PHPをCGIで使う例は稀かと

221:デフォルトの名無しさん
14/02/16 23:07:15.10
>>220
>>221みたいな認識でPHPを否定してPerlを使い続けてるのがPerl厨なんだよ

222:デフォルトの名無しさん
14/02/17 01:44:26.48
PHP使うくらいならPerl4を使うけどな、このスレ的にも

223:デフォルトの名無しさん
14/02/17 08:01:50.33
そもそも用途が全然違うものを比べる意味が解らないな

224:デフォルトの名無しさん
14/02/17 11:11:07.50
Perl使える奴がわざわざぺちぴー入れてまで使う理由がない

225:デフォルトの名無しさん
14/02/17 21:20:39.98
>>222
PHPのクラスやトレイトを
Perl4でどうやって実装するの?

226:デフォルトの名無しさん
14/02/17 23:26:58.49
必要のないものをどうして実装する必要があるのだ

227:デフォルトの名無しさん
14/02/18 01:23:53.24
2つも3つも糞スレ建ててんじゃねーよゴミPerler

228:デフォルトの名無しさん
14/02/18 02:13:13.87
それぺちぱーだろ

229:デフォルトの名無しさん
14/02/18 22:40:42.68
>>226
まず必要あるかないかは、必要あるという前提にしましょう。
別にPHP専用用語ではないのだから、世界的には必要あるという流れです。

その前提で、どうやって実装するのか答えてください。

230:デフォルトの名無しさん
14/02/19 01:19:55.57
必要あるやつが実装すればいいだけのことだな

231:デフォルトの名無しさん
14/02/19 15:50:16.30
これからは質問者が来ても全部>>230のレスしか返りません。

232:デフォルトの名無しさん
14/02/19 20:01:53.86
#!/usr/bin/perl
$buffer = $ENV{QUERY_STRING};
@pairs = split( /&amp;/, $buffer );
foreach $pair ( @pairs ){
( $name, $value ) = split( /=/, $pair );
$FORM{$name} = $value;
}
$A = $FORM{name1};
$B = $FORM{name2};
print "Content-type: text/html\n\n";
print << "_EOM_";
<html>
<body>
A*B = $A * $B
</body>
</html>
_EOM_

233:デフォルトの名無しさん
14/02/19 20:04:58.23
上みたいなプログラミングを組んで、A=とB=にそれぞれ任意の数字を入れるとA*Bの答えが表示されるようにしたいんですが、
いざ実行してみても上のプログラミングがそのまま表示されるだけで正しい結果が得られないのですが、
どうしたらよいでしょうか。

234:デフォルトの名無しさん
14/02/19 20:09:03.95
というか、どこかおかしいところがあるでしょうか?

235:デフォルトの名無しさん
14/02/19 20:33:02.58
>>232-234
おかしいのはお前の頭だ
基本的なこともできてないくせに他人に質問とか頭腐ってんじゃねーの

236:デフォルトの名無しさん
14/02/19 20:36:13.45
>>234
>>232,>>233が板違いだということに気付かないのがおかしい。

平気で板違いの書き込みをするキチガイは迷惑。

お前みたいなクズはリアルでも迷惑がられてるんだから自覚しろ。

237:デフォルトの名無しさん
14/02/19 20:41:12.79
>>232=基礎をやらずにいきなりプログラミングから入る典型的なゴミ
目的達成までの手順すら把握できてないからプログラミング以前の問題
何やっても駄目な奴のパターン
人生乙

238:デフォルトの名無しさん
14/02/19 20:41:52.31
しね

239:デフォルトの名無しさん
14/02/19 20:47:40.29
>>237
人生乙は言い過ぎ。

高卒以上なら人生乙だけど、
>>232-234みたいな小学生は
中高で挽回できる可能性がある。

240:デフォルトの名無しさん
14/02/19 20:49:37.80
一人芝居乙ですwwww

241:デフォルトの名無しさん
14/02/19 20:50:45.28
>上みたいなプログラミングを組んで、A=とB=にそれぞれ任意の数字を入れるとA*Bの答えが表示されるようにしたいんですが、
>いざ実行してみても上のプログラミングがそのまま表示されるだけで正しい結果が得られないのですが、
日記はブログに書け

>どうしたらよいでしょうか。
今すぐプログラミングやめろ
そして二度とくるな

242:デフォルトの名無しさん
14/02/19 20:53:44.83
Perl系スレは質問者が叩かれると張り切って答える奴がいるから 質問したら自演で自分を叩くのが常套手段

243:デフォルトの名無しさん
14/02/19 20:56:43.89
>>234
スレ違いのネタで荒らす以外やることないわけ?

244:デフォルトの名無しさん
14/02/19 20:59:52.26
スレ違いどころか板違い
頭が悪いにも程がある
発達障害かもな

245:デフォルトの名無しさん
14/02/19 21:03:24.03
>>232
馬鹿はPerlコミュニティの質を下げるだけだからこっちに行ってくれ。
スレリンク(php板)

246:デフォルトの名無しさん
14/02/19 21:11:38.56
>>232
PHPなら一瞬で片付く案件
<?php
$x = $_GET['name1'] * $_GET['name2'];
echo( $_GET['name1'] . " * " . $_GET['name2'] . " = " . $x );
?>

247:デフォルトの名無しさん
14/02/19 21:16:25.09
>>234
入門書1冊読めば大抵書いてあるはずだが・・・
本1冊買えない乞食か?
そんなに金がないならプログラムなんかやめてバイトでもしたほうがいい
日雇いでも書籍1~3冊買える金もらえるぞ

248:デフォルトの名無しさん
14/02/19 21:27:19.38
初心者スレってかいてあるだろーが字よめねぇのかよカス

249:デフォルトの名無しさん
14/02/19 21:34:53.78
書籍すら読めないのは初心者以前に脳に異常がある

250:デフォルトの名無しさん
14/02/19 21:42:16.32
>>248
だよね。
初心者だったらスレ違いだろうが板違いだろうが
気違いだろうが許されるよね。

251:デフォルトの名無しさん
14/02/19 22:23:35.20
>>250
板違いは許されんよ。
基地外はスルーだよ。
頭悪いのはテキトーに対応するべきだよ。

252:デフォルトの名無しさん
14/02/20 01:17:13.12
初心者は自力で解決しようとしない奴のことではないぞ

253:デフォルトの名無しさん
14/02/20 19:53:03.78
>>232
A*B = $A * $B

の部分を

A*B = @{[ $A * $B ]}

254:デフォルトの名無しさん
14/02/20 20:41:02.18
>>253
板違いのゴミ(>>253)にエサを与えないでください。
エサを与えるとゴミ知能の>>253が味をしめて今後も荒らしに来るようになります。

255:デフォルトの名無しさん
14/02/21 00:11:06.41
と荒らしが申しております

256:デフォルトの名無しさん
14/02/21 01:00:44.16
>>255を見れば分かるが

「板違いは荒らし」という人間 = 荒らし

この思考回路がPerl厨

257:デフォルトの名無しさん
14/02/21 02:50:14.54
>>256
残念ながら、思考回路も間違ってるしPerl厨でもないなあ
板違いの指摘そのものは問題ではないよ、実際のところ >>232 は板違いだしな

ただ板違いへの対応ってのは
・板違いと指摘する
・徹底してスルーする
であるし
>>254 が板違いのゴミと呼ぶ >>253
「板違い」ではなく「板違いに誤った対応をした人物」でしかない。

しかも内容は相手を煽るような罵倒語ばかり。
誤った煽りは、結果的にはその人物の発言を増やすことになる。
だから >>254 も荒らしってことなんだよ。

ああ、荒らしにレスするのも荒らしだからな
俺が荒らしと言われても、勿論構わないよ?
荒らしにレスしたことには間違いないしな。

258:デフォルトの名無しさん
14/02/21 02:51:46.89
>「板違いは荒らし」という人間 = 荒らし
Perl厨はいちいちこんなこと考えてないと思うぞ。
単に 気に入らない奴=荒らし ってことだと思われる。

259:デフォルトの名無しさん
14/02/22 22:30:28.45
質問させてください。
現在、NEなのですが、社内SEを目指しています。
その時に、サーバ作業を簡単に処理させる言語が必要にりそうなのですが、
Perlは向いていますでしょうか?
掲示板とかを作るつもりはありません。作業の効率化が目的です。
隣の席のプログラマさんに聞くと、
Perlは古くてCGIにはもう未来がないよー、ってお勧めされないのですが…

260:デフォルトの名無しさん
14/02/22 23:19:05.46
>>259
IT系で上を目指そうって人間に何でPerlなんて選択肢があるわけ?
そこらへん考えたほうがいいよ。

SEならITに関しては常に最新の動向を知るためにアンテナ張ってなきゃならないし、
アンテナ張ってればPerlがいかに駄目かというこてが分かる。
SE目指すならその辺りを自分で調べられるようになってたほうがいい。

261:デフォルトの名無しさん
14/02/22 23:25:59.25
>>259
PHPのほうがいい
作業を簡単に処理させるスクリプトとかって最初はそのつもりがなくても便利ならそのまま他のものを作るときに組み込んだりする
エンジニア以外でも有用な場合はWebインターフェースにして提供することなるけどその場合にPHPで書いてあるとインターフェース作るだけですぐに提供できる

262:デフォルトの名無しさん
14/02/22 23:28:04.79
>>259
マジレスすると今現在はRuby
但し3ヵ月後、半年後は分からん
自分でその情報を追えないならSEはやめとけ
今現在既に追えてないみたいだけど

263:デフォルトの名無しさん
14/02/22 23:50:35.64
>>259
そもそもその文脈でCGIは全く関係ないよ。そこに気付けないなんて釣りだろ?

264:デフォルトの名無しさん
14/02/22 23:56:23.80
>>260-263
ありがとうございます!
javaか、PHPか、perlで悩んでました。
色々調べると、PHPが入り易そうなので、、
明日、本屋に行って、決めます。

※CGIは、掲示板とか作るのであって、検索とかするのとは違うなあ、
と思いながら、プログラマさんの意見を聞いていました。

265:デフォルトの名無しさん
14/02/23 00:03:57.16
>>264
やっぱ釣りだったか

266:デフォルトの名無しさん
14/02/23 00:08:16.47
PHPが第一候補だったのですが、某サイトで、

PHPは、WEB系以外には、まったく意味がない、との様なコメントがあり、困りました。
javaは、いきなり入るには、まだ敷居が高いかなと悩みました。
perlは、単に簡単な、検索や置換には適しているようなコメントで一気に候補に挙がりました。

これらから悩んでいたんです。コメントありがとうございます。

267:デフォルトの名無しさん
14/02/23 00:20:28.63
>>266
そのコメントとやらの投稿日時と信憑性も確認しろよ
まさか去年の夏以前の投稿で、しかも第一線で活躍してい"た"奴の投稿じゃないだろうな

3ヵ月以内の投稿で、しかも第一線で活躍してい"る"人の投稿なら信用しろ
そしてそういう人ならまずPerlを候補に挙げることはない

まぁ第一線で活躍してるわけでもない俺のこんな匿名の投稿も信憑性がないだろうから
第一線で活躍してる人がPerlなんか使わないということは自分の目で確認してくれ

268:デフォルトの名無しさん
14/02/23 00:24:33.24
>>267
投稿日時、第一線は確認していませんでした。
すみません、助言、ありがとうございます。

269:デフォルトの名無しさん
14/02/23 00:27:42.14
>>266
PHPがWeb系以外に使えんのは本当
Perlでも良いけど、RubyやPythonも有効だよ
まあ、まずは最初にシェルスクリプトだけどね

270:デフォルトの名無しさん
14/02/23 00:38:05.80
と言うか、PerlスレにPHPのこと聞く時点で釣り

271:デフォルトの名無しさん
14/02/23 00:39:36.75
>>269
>PerlとLispが結婚して隔世遺伝が黒魔術で生まれた言語。
>Javaは硬度8くらい、Pythonは6くらいになるのに対して、Rubyは3くらいになる。

との記事を見つけました。いつの記述かわからないのですが(汗)
Rubyも明日、本屋で漁ってみます。ありがとうございます。

272:デフォルトの名無しさん
14/02/23 00:40:48.81
>>270
すみません。退散します。
みなさん、マジレス、ありがとうございます。

273:デフォルトの名無しさん
14/03/05 06:22:38.93
>>232-234
_EOM_なんて使っちゃだめだよ。見づらい。

print "Content-type: text/html\n\n";
print "<html>";
print "<body>";
print "A*B = $A * $B";
print "</body>";
print "</html>";

274:デフォルトの名無しさん
14/03/25 21:15:29.29 dz69sIJc
print "あいうえお";

↑これを文字コードをeuc-jpで保存してコマンドプロントからこのファイルを実行して
コマンドプロンプト上に文字化けなく あいうえお と出力させるにはどういうコードを追加すればいいの?

275:デフォルトの名無しさん
14/03/25 21:25:34.52 dz69sIJc
>>274はちょっと疑問に思っただけで何かするのに必要なワケじゃないので無理して
答えようとしないで下さい。たぶんちょっとググった程度で分かるようなことではないです。

276:デフォルトの名無しさん
14/03/25 21:54:24.41 En8OrmpQ
>>274-275
URLリンク(perldoc.jp)

use encoding 'euc-jp', STDOUT => 'cp932';

但し Perl 5.18.0 以降、encoding プラグマは非推奨で将来的に削除される予定。
URLリンク(perldoc.perl.org)

277:274
14/03/25 22:08:05.94 dz69sIJc
>>276
うおお、すごい、あっさり出来てしまった・・。
今日一日↓こんなのでやろうとして泥沼にハマってました。

use encoding "euc-jp";
binmode STDOUT, ':encoding(cp932)';

スーパーハカーさんどうもありがとう~

278:デフォルトの名無しさん
14/05/07 01:39:02.09 NfbdqxRr
print +(3,2,1,),"\n";

↑これ、+記号を消すと改行が反映されなくなるんですが、この+記号って
どういう意味ですか?ググるためのキーワードだけでもおねがいします。
ググると +{ } は出てきたんですが +( ) はなぜか見つかりませんでした。

279:デフォルトの名無しさん
14/05/07 04:47:36.14 nyTYPDB6
>>278
(print(3,2,1)), "\n";

280:デフォルトの名無しさん
14/05/07 06:28:00.20 WoJ0c0N0
+() は scalar () とほぼ同等。
+{}は、ブロック中の戻り値(?)をスカラーとして評価しますって意味。
+()は、リストとして評価しませんよーって意味。

perldocのperlopの
Terms and List Operators (Leftward)

Unary "+"
を参照してください。

281:278
14/05/07 09:44:31.49 NfbdqxRr
>>279-280
なるほど、+{ } と同じような使い方だったんですね、ありがとうございました。
perldocもこれから読んでみます、多謝。

282:デフォルトの名無しさん
14/05/17 17:23:28.43 syasv/b2
windowsの隠しファイルを判別する方法を教えてください

283:デフォルトの名無しさん
14/05/17 18:53:12.61 9KhUrEje
>>282
URLリンク(search.cpan.org)

use Win32::File qw(GetAttributes HIDDEN);
GetAttributes($ARGV[0], my $attr) or die $!;
print +($attr & HIDDEN) ? 1 : 0;

284:デフォルトの名無しさん
14/05/17 18:54:17.69 syasv/b2
>>283
ありがとうございます

285:デフォルトの名無しさん
14/05/24 13:13:06.88 JzdRsmzF
掲示板のCGIを設置したんだけど、<a href="./bbs/mtbbs.cgi?">って感じにリンクするようにして、URLリンク(172)では、ちゃんと作動したんだけど、
実際にFTPに転送すると、作動しないどころか画面が写らない
500エラーが出てくる

原因に関してはまだわかんなくて、調べてるんだけど、そもそも思ったのが<a href="./bbs/mtbbs.html">ならまだしも<a href="./bbs/mtbbs.cgi?">なんて、直にリンクすることなんてできるの?

286:デフォルトの名無しさん
14/05/24 17:20:37.74 Cq+cm/k7
>>285
WebProg板へドゾー

287:デフォルトの名無しさん
14/05/25 10:23:53.30 iOXakntE
>>285
リンクはできる
動かない原因は別にある

288:デフォルトの名無しさん
14/06/04 10:34:27.77 8N6swAY/
知恵袋で質問したら回答どころか閲覧すらなさすぎワロタ・・・

289:デフォルトの名無しさん
14/06/04 15:39:06.30 ZiHf6GEW
早くマジレスしろ屑やろう

290:デフォルトの名無しさん
14/06/05 04:14:43.22 tjfA5i3O
質問してもどうせまともに答えてくれないんだろうな
どこ行っても解決しないわ

291:デフォルトの名無しさん
14/06/05 06:34:54.17 Mvr5+GEe
Web以外で最近なんか未解決質問あったっけここ

292:デフォルトの名無しさん
14/06/05 19:01:58.49 aZWI6Ot4
>>291
今日も元気に残件なす!

293:デフォルトの名無しさん
14/06/08 05:04:05.20 LT2twBt5
複数のRSSフィードを結合して一つのRSSを生成したい。
その際、「生成されたフィード記事のリンクURLすべてを任意のリンク先に指定する。」
このやり方を教えてください。

XML::FeedPP、XML::TreePPというモジュールを用い、下記のCGIプログラムを使用して自動更新する1つのフィードを生成するところまでは出来ました。
しかし、他の部分はチョロチョロと変えることができるのですが、記事リンクだけはどうしても変えることができません。全部の記事リンクを、ある1つのリンクに変換したいだけです。

#!/usr/bin/perl

use XML::TreePP;
use XML::FeedPP;

my $feed = XML::FeedPP::RDF->new();
$feed->merge( "結合したいrssフィード1" );
$feed->merge( "結合したいrssフィード2" );
my $now = time();
$feed->sort_item();
$feed->pubDate( $now );
my $atom = $feed->to_file( "index.rdf", "UTF-8" );

print "Content-type: text/plain\n\n";
print "出力完了\n";

使ってるレンタルサーバーはロリポップです。

複数のフィード(RSS、Atomなど)をまとめるCGI
URLリンク(blog.audiofan.net)
[Perl] XML::FeedPP - RSS・RDF・Atomフィードの解析・生成・変換・結合
URLリンク(www.kawa.net)
XML::FeedPP
URLリンク(metacpan.org)
URLリンク(search.cpan.org)

294:デフォルトの名無しさん
14/06/10 06:01:49.29 hRaawaun
>>293
WebProg
URLリンク(nozomi.2ch.net)

295:デフォルトの名無しさん
14/06/10 12:30:22.68 zpbxFFHG
URLリンク(s1.gazo.cc)
こういった10行で一組のデータの中に
---
市民の...

yerles
warrior
---
というパターンが多くあります。
マッチ検索したいのは
---
市民の...

dog
warrior
---
というパターンです。
"市民"という文字を見つけたら
2行下に
"dog"という文字があるならば
その、"市民の..."を出力して欲しいです。

ファイル読んで単純マッチするぐらいしか今はできません
open (my $in , "<" , "./cdatan_5_101.s2");
while (<in>){
  if (/yerles/){print "matched\n"}
}
close $in;



}

296:デフォルトの名無しさん
14/06/10 13:44:16.05 kKsVvptA
>>295
URLリンク(ideone.com)

297:デフォルトの名無しさん
14/06/10 13:58:26.18 kKsVvptA
手抜きすぎた。

>>295
URLリンク(ideone.com)

298:デフォルトの名無しさん
14/06/10 14:45:55.30 zpbxFFHG
凄い。ありがとう。
出てきたshiftとか勉強してみます
感謝

299:デフォルトの名無しさん
14/06/11 22:22:53.08 PCU6+AOL
どこにshiftの出番があるのか?と思ったらそう言うことか。
普通に配列に突っ込んで、マイナスのインデクスでアクセスすりゃいいやん。
$ perl -Mvars=@a -lne 'push @a, $_ ; next if !/dog/ ; next if $a[-3] !~ /市民/ ; print $a[-3]' File
メモリ喰いが気になるのなら、
$ perl -Mvars=%h -lne '$h{$.} = $_ if /市民/ ; next if !/dog/ ; next if ! defined $h{$. - 2} ; print $h{$. - 2}' File
とか、で節約すりゃいい。、、、けど、今時そんなの気にする必要もないだろ

上のワンライナーでやってる事は、
$ perl -MO=Deparse -Mvars...略
でわかる。

300:デフォルトの名無しさん
14/06/12 13:15:46.45 qt4Roz23
恰好をつけるなら、リングバッファでも書くところですが、回答としては、あんまりだと思ったので。
2行固定なら、別に使わなくても。
perl -ne '($_, $x, $y) = ($x, $y, $_); $y =~ /dog/ && /市民/ && print' File

何も考えなくていいなら、正規表現でバッサリ。
perl -e 'print((local $/ = <>) =~ /(^.*市民.*\n).*\n.*dog/gm)' File


最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch