【Perl上級者コーナーPart01】

sub function
{

}
みたいな書き方する奴は初心者以下。
低脳糞アホはしね。
初心者がしゃしゃり出てくるな糞が。ばか

>>71
激しく同意。

>>71=>72
ハハッ！ 自分の意見に同意してるガラクタ野郎の意見に反対。

>>71=>>72
自作自演でした。

>>71 激しく同意。
>>73=74=初心者以下

>>71=>>72=>>73=>>74>>75=>>76
自作自演でした。

自作自演ってのは置いといて、
>>71がその関数スタイルを嫌う理由は何だろう？
俺はいつもそのスタイルなんだが…。

漏れはこう書くんだが、

sub function {

};

プロトタイプをおぼえたてさんのIDは St7kmpIx ですか？

初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初
心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心
者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者
厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨
房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房
は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は
死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死
ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね初心者厨房は死ね

透明あぼーんに指定完了。

ダメダこりゃ。聞いた俺が馬鹿だった。

japhだってさ。恥ずかしい奴(大爆笑）
コテハンは漏れなく死ね

初心者以下のカスがjaphなんて名乗るなよ。
コテハンは死ね。

コテハンウザイ

>>82
次のターゲットはお前な。

　　　　　　　　　　ID:St7kmpIx　ID:Y17fBuLU 必死だな（藁

なんか昨日から知ったかぶり厨房がやたら暴れてるな。

(･∀･)ｶｴﾚ!!

>>88
コテハンは死ね

コテハンは低スキルばかり。

＞＞８９−９０hagesikudoui

ｼﾞｻｸｼﾞｴﾝ晒しage

(´-`).。oO（この板で数分以内にレスがついたら9割方ｼﾞｻｸｼﾞｴﾝ…）

>>93

>>88-91
明らかに自作自演だな（ｗ
ID:St7kmpIx だと、オモワレ（ｗ

コテハンて、何でこんなにレベルが低いの？

おまえの人間的なレベルのほうが相当低いと思うよ。

>94
ここまでわかりやすい自作自演は久しぶりに見た。
きっと、書き込むときは必死なんだろうなぁ。

ファイルのアップロードを行うルーチンを教えて下さい。

とりあえず、HTMLで<input type=file ...>でcgiに送ると
ファイルへのフルパス（文字列）が送られてくる事までは
テストしていて、わかりました。ここからどうやってファイルの
情報を取得して、鯖に保存するのかがどうしてもわかりません。

上級者の皆様ご教授お願いします。

>>98の補足
モジュールを使えばいい話なのですが、探究心からどのように
アップロードを処理しているのか、気になって仕方ありません。
モジュール無しで処理する方法をご教授くださいませ。

既存の物を自分で解析しなさい。

>>100
はい。それもチャレンジしてみたのですが、どのＣＧＩも余計な処理が
まざっているので（当然ですがｗ）、私には解析不可能なのです。。

それで、モジュールなし+どのように処理しているか知りたい、は無理だろう。

上級者
sub func {
....
}
糞馬鹿
sub func
{
.....
}

漏れはどうだろ。

sub func {

};

>>104
そういうコードを見たことがあるんだけど、
その最後の「;」に意味はあるの？

なんか、最期には ; を付けるってのが自分の中では成り立ってて。

>コテハンはなぜ低スキルなのか
に答えろ！

>>102
ごもっともです。もうちょっとスキルアップしてから
再チャレンジすることにします。

a

afe

>>95-97 ｼﾞｻｸｼﾞｴﾝ（･∀･）ﾃﾞｼﾀ!!

これも、スゲー解りやすい（ｗ

>>103-106

>>99
http://www.ietf.org/rfc/rfc1867.txt

これ読んでみれ。 それでもできないなら自分は厨房以下だと思ってあきらめろ。

>>113 無理です

　　　　　　　　 _,-,_i_ ,　　　　　　l-ノヽ
.　　　　　　　／　＼ ヽ　　i,　　_l,,/　 ~''-,_
　　　　　　／___,,,,,,_,,,-''~~'''''-''~-'''''''''-,~／i,_
.　　　　　,_i'-,,,,_,,-'::::::::::::::::::::::::::::::::::::::::::~'ヽ,_l
.　　　　 / '''''／::::::::::::::::::::::::::::::::::::::::::::::::::::::::::ヽ.,,
　　　　 /　./:::::::::::::::://::::::::::i::i;::::::l:::::ヽ:::::::::::::::ヽヽ
　　　　l_／/:::::::::::::/:/::/::::::::ll:l l::::::l::::::ヽ::::::::::::::::ヽ.ヽ
　　　　 ,ﾉ/:::::::::::::/:/://:::::;:/l:l　l:::::l.l:::::::l:::;::::::::ヽ:::l　~'i
　　　　 l.l:l::::::::::::/:// /::/l:/ l:l　 ll:::l .l::;:::l:::l::::::::::l:::l
.　　　　 l|.l::::::::::// / l::/_/-.l/ ~''l'l:l,,,_l:ll::lヽl:::::::::l.l:l
　　　 　,l-l::::::::/_,,,l,-l/ /___ 　　___　　 l '~~l.l::::::/ l|
.　　　／::::ヽ::::/l　===＝＝　　 ＝＝=== /ll::::/:ヽl
.　　／:::;-''i:ヽl::l　　////　　　　　 ////　l::l／~''-;ヽ
　 /;;-''　　.ヽl::::l,_u　　　 ＿＿＿　　　　／:l　　　 ~''ヽ
　/''　　　　_..,l::::l-ヽ,,_　 ヽ,,_____ノ　 _,,-'''l::::l~~''''--,,,_
　　_,,,,-''''~　 .l::::l.-==/~''i--,,,,,,,--,'~-''　l::::l　　　　　/
　ヽ　　　　　　l::::l_,-〈　　~''''人'~　ヽ''-　l:::l　　　　 /
.　　＼　　　 　 l:::l　 ヽ　　.（⌒）　　l　　 l::l　　　 ／
　　　　 　　　　 .l::l　　ヽ,_,ﾉ'~'''~ヽ,_ﾉ　　 .l:l
　　　　　　　　 　l|　　　 /　　l　　ヽ　　　l!
　
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　あきらめます

------------------みんなで投票！--------------------
　　　　　　　　　Perlerはだれか？
　　　　　　　　　　1.gunzip
　　　　　　　　　　2.Dream
　　　　　　　　　　3.gikoTK
　　4.姫
　　　　　　　　　　5.zenhitei
　　　　　　　　　　6.japh ◆J.5V8ta6
　　　　　　　　　　7.名無し「いや、たぶんこの板とは関係ないんじゃ、、」
　　　　　　　　　　8.実はひろゆき
　　　　　　　　　　9.名無し(nobodyさん)
　　　　　　　　　　10.実は俺
　　　正解者には３ｃｈ製作許可を俺が出しますので勝手に作れ。
--------------------------------------------------------

Dream★に一票

>>116
俺もDream★に一票!

>>116-117
激しく同意！
Dream★しかないだろ！！

じゃあ俺もDream★にしよっと

>>116-119
はｇせしくどうい！
Ｄｒｅａｍ★に清ききっぴぃうを！

久々に来たんだけど凄い糞板になって(略
CGIに依存しない〜〜の粘着は何だアレ?
_gunzipとJAPUと電動は何処行ったの?
全員荒らしが追い出したのか
Dreamって何?
誰か適当に説明きぼん
5.7ネタ楽しみにしてたのに････

つーかjaphって何やねん　　（鬱
二編なんかｲﾗﾈｰ　　(−＿−#
何だかなあ･･･

http://profiles.yahoo.co.jp/tengaiten2002

WebProgコテハン盛衰記

2000/5　　　　　　　　2001　　　　　　　　　　　　　　　 2002　　　　　　　　　　現在(2002/7)
　╋━━━━━━━╋━━━━━━━━━━━━╋━━━━━━━━━╋

　←───────────────────────・・・　japu
　←──────────────→　ほういち
　　　　　　　　　　　←─────────────────────・・・　_gunzip
　　　　　　　　　　　　　　　　←──────・・・　T女の竹田
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　⇔　Dream★
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　←　japh
　　　　　　　　　　　　　　　　　　　　　　←──・・・　rubbish_lister
　　　　　　　　　　　　　　　　　　　　　　　←──────────・・・　GikoTK作者

japuﾀﾝは忙しいだけでしょう。

あぼーん

固定どころか名無しの盛衰記すら書けそうな板で。

>>124
電動ななしたんと教えてクンが居ない･･･　　；＿；

大爆笑しながらレスくれたあの人は誰だっけ

Perl/CGI板〜WebProg板 コテハン盛衰記 (記憶にある人のみ)

2000/5　　　　　　　　2001　　　　　　　　　　　　　　　　　2002　　　　　　　現在(2002/7)
　╋━━━━━━━╋━━━━━━━━━━━━━╋━━━━━━━━╋

　←────────────────────────・・・　japu
　　←───────────→　ほういち
　　　　　←─────────────────・・・　電動ナナシ
　　　　　　　　　　　←─────────────────────・・・　_gunzip
　　　　　　　　　　　　　　　　←──────・・・　T女の竹田
　　　　　　　　　　　　　　　　　←→　（大爆笑）
　　　　　　　　　　　　　　　　　　　　　　←──・・・　rubbish_lister
　　　　　　　　　　　　　　　　　　　　　　　←──────────・・・　GikoTK作者
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　⇔　Dream★
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　←　japh
採点：
japu　　　　　　★★★★★
ほういち　　　 ★★★★
電動ナナシ　　★★★★★
_gunzip　　　　　★★
T女の竹田　　★★★
（大爆笑）　　　★★★
rubbish_lister　★★
GikoTK作者　　★★★
Dream★　　　 ★
japh　　　　　　 ★★

なんでgunzipが２なんだよ！
アイツが一番突っ込んでただろが
_gunzip　　　★★★★★★★★★★

んで、>>129-130は自作自演と言われ、また_gunzipが叩かれる罠。
どーでもいいけど（わら

簡単なルールです。

ときどきageましょう。
　　同内容の単発スレッドが立てられることを防止するためです。
　　大体50番目以下になるようでしたらageでお願いします。

荒らしは無視しましょう、
　　我慢強さはプログラマには必須です。
　　むかついてもﾏﾀｰﾘいきましょう。

固定ハンドルを名乗るときはトリップをつけましょう。
　　ここではみんな匿名です。名前には信用性はありません。
　　自分が自分であることをみんなにわかってほしいときは
　　トリップを使用しましょう。

はっっはっは、荒れてますな。

（大爆笑）とかGikoTK作者はコテハンではない気がするのだけれど。

２人減ったらコテハン８人になっちゃうじゃん・・

　　　　　　　_,. -ｰ-ｰ-―-､_
　.　　　 ,.‐'" 　 . '　　　　　....ヽ
　　　　ﾉ　il;!:.　i　　　　....::::::::::::ヽ
　 　 　l /⌒ヽ､;_.;:: ''"⌒`ヽ;::::::::::i
　 　 　l:l　　　　　　　　　　:::l::::::::::l
　 　 　}|＿_-､ 　 　 ＿＿;;;;;;ﾐ;::::::l
　　　　『 tｰ｡､`ー''´,.-｡ーt :il;}=i‐ｧ
.　　　　l､ `ー' .へ::. `ー‐'’./:j/f'/ 　ここのコテハンは
　　　　 l ￣￣ j:::. ￣￣￣::::::rイ　 　 ばーかですねぇ。ﾑｼｬﾑｼｬ　
.　 　　　ヽ.　､__`＿＿＿，::::/:::!
　　　　　　ヽ. `ｰ__--‐'′／ﾚ'′
　　　　　　　|ヽ.　　　　／:::;Λ
　　　　　　ノl＼`:ー:''"::::／　ハ､
　　-‐'' ﾌ:::::::|　 `jiiiii‐ " 　 /::::::li｀'''ｰ-
　　 :::::/;:;:;:;:;:|　.ｨilllllﾄ､　　/;:;:;:;:;:li::::::::

panton氏は？

むぎ茶は？

荒らしてる暇があったら寄付せよ。

むしろ俺に寄付して欲しい
一口一万年間保証。有給アリ

なにか?

【Perl】諸新車コーナー Part13b
とかスレたてたら殺されますかね？

　　　　|~￣￣|　　　　　／￣￣￣￣￣￣￣￣￣￣￣
　　　　|____†__| .♀　 ＜　出でよ、1000ゲット神よ！
　　　 （_.・∀・ .）.‖　　 ＼＿＿＿＿＿＿＿＿＿＿＿
　　　 /　~〉†〈/つ
　 　ノ　 ノ|　 |...‖
　 ´〜（_＿）,__）‖ゝ

@@@@@@@@@

age

　　　　　　　_,. -ｰ-ｰ-―-､_
　.　　　 ,.‐'" 　 . '　　　　　....ヽ
　　　　ﾉ　il;!:.　i　　　　....::::::::::::ヽ
　 　 　l /⌒ヽ､;_.;:: ''"⌒`ヽ;::::::::::i
　 　 　l:l　　　　　　　　　　:::l::::::::::l
　 　 　}|＿_-､ 　 　 ＿＿;;;;;;ﾐ;::::::l
　　　　『 tｰ｡､`ー''´,.-｡ーt :il;}=i‐ｧ
.　　　　l､ `ー' .へ::. `ー‐'’./:j/f'/ 　ここのコテハンは
　　　　 l ￣￣ j:::. ￣￣￣::::::rイ　 　 ばーかですねぇ。ﾑｼｬﾑｼｬ　
.　 　　　ヽ.　､__`＿＿＿，::::/:::!
　　　　　　ヽ. `ｰ__--‐'′／ﾚ'′
　　　　　　　|ヽ.　　　　／:::;Λ
　　　　　　ノl＼`:ー:''"::::／　ハ､
　　-‐'' ﾌ:::::::|　 `jiiiii‐ " 　 /::::::li｀'''ｰ-
　　 :::::/;:;:;:;:;:|　.ｨilllllﾄ､　　/;:;:;:;:;:li::::::::

久しぶりに覗いたら、自分の名前があったよ。懐かしい。
最近はごくごくたま〜に名無しでレスするぐらいだなぁ。就職したし。

↑みたいな糞コテは皆殺しだ！

>>148
がんばって！（ぷ

　　　　　　　_,. -ｰ-ｰ-―-､_
　.　　　 ,.‐'" 　 . '　　　　　....ヽ
　　　　ﾉ　il;!:.　i　　　　....::::::::::::ヽ
　 　 　l /⌒ヽ､;_.;:: ''"⌒`ヽ;::::::::::i
　 　 　l:l　　　　　　　　　　:::l::::::::::l
　 　 　}|＿_-､ 　 　 ＿＿;;;;;;ﾐ;::::::l
　　　　『 tｰ｡､`ー''´,.-｡ーt :il;}=i‐ｧ
.　　　　l､ `ー' .へ::. `ー‐'’./:j/f'/ 　148 は
　　　　 l ￣￣ j:::. ￣￣￣::::::rイ　 　 ばーかですねぇ。ﾑｼｬﾑｼｬ　
.　 　　　ヽ.　､__`＿＿＿，::::/:::!
　　　　　　ヽ. `ｰ__--‐'′／ﾚ'′
　　　　　　　|ヽ.　　　　／:::;Λ
　　　　　　ノl＼`:ー:''"::::／　ハ､
　　-‐'' ﾌ:::::::|　 `jiiiii‐ " 　 /::::::li｀'''ｰ-
　　 :::::/;:;:;:;:;:|　.ｨilllllﾄ､　　/;:;:;:;:;:li::::::::

削除以来だ死しました。

質問ですが、いっさい本とかに紹介されていない関数があるということですが、
どんな関数か知ってるかたいらっしゃいますか？

キチガイ粘着のParrot使い＠PERL上級車さんが
教えてくれるでそう　　（ｦ

「Parrot使い」じゃなくて、
「Parrotに実験的についている、仕様も完全には固まっていないPerl6を
実装状況も調べずに動かして、Perl6使いになった気分でいる馬鹿」

の間違いじゃないか？

　　　　　　　|　 ＼
　　　　　　　|　　　＼　　┌ ∧､
　　　　　　　|　　　　 ヽ￣(ﾟДﾟ,,)
　　　　　　　|　　　　　 ℃ _'ﾇ ,ヨ
　　　　　　　|　　　　　　 と|_ノ‖
　　　　　　　|　　＿＿＿(_(⌒'人＿＿
　　　　　　　|　く　　　　　　￣￣
　　　　　　　|　　>　　　ヾ
　 ｻﾞｯﾊﾟｰﾝ |　 （　　　　　　ヾｿ
　　　　　∵,,| ∵ヽ
　　　　　　　| ∴ﾐζ[[アホ釣り]]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
なんかPerl5.8R3を一生懸命脳みそこねこねコンパイルしてたが
perl5.8ってやっぱあったのね。cppは壊れCドライブじゃgccが使えなくなった（泣
んで./configure -d;makeは途中でとまったが、perl.exe+perl5.8dllはできたので
そのうちアップですよ〜。脅えて待て！

固定に粘着してるアホはこいつか････
良いから早々に死んでくれ、頼むよホント

固定に粘着してる奴より
固定に拘泥してる奴のほうがｳｻﾞｲ

名無しに拘泥して糞スレ上げる君は間違い無く最高にｳｻﾞｲけどね

じゅうきネットのデータがついに漏れた模様！！

ここにあぷしてあります。

http://www.wastyle.net/sumi/

固定に粘着している奴は、固定に拘泥している人間でもあるのでは？

せっかくだから上級者コーナーに相応しい話題でも振れや。
俺？俺はウンコだから駄目。

んじゃ上級者らしく
初心者にでも簡単にできるばっちり排他制御を書いてくれ
いや書いてくださいおながいします

初心者にも簡単にできるばっちり排他制御を書くのって上級者らしいか？

と　り　あ　え　ず　お　前　が　知　り　た　い　だ　け　だ　ろ

「僕はActivePerlを越えるんだ！」（核爆
http://hiero_pl.tripod.co.jp/perl5_8_0.lzh (win/cygwin)
いまんとこモジュールはちょいめんどう。
というか完全コンパイルできん。
あとperl -V が効かん。
まぁ「perl -D *.pl」でデバッグできるのでOPコードみてはぁはぁ三昧してください。
cygwin1.dll含めて圧縮したら1FDにPerl5.8が収まるなんて感激じゃないかね？ワトソン君。
しかし「実用Perl」って意外といい本だな〜。

このｽﾚは固定HN粘着ｷﾁｶﾞｲのｵﾅﾆｰｽﾚになりました

以降ｷﾁｶﾞｲ以外ﾚｽ禁止

　　　　 ///////
　　　　///////＿＿＿＿＿＿＿＿＿＿＿_
　　　 /////// ￣￣￣￣￣￣￣￣￣|￣￣
　　　///////　　　　　　　　　　　　　 (~)　ﾁﾘﾝﾁﾘﾝ
　　 ///////　　　　　　　　　　　　　　ﾉ,,
　　///////　　　　 ∧＿∧　　　　　　　　 ／￣￣￣￣￣￣
　 ///////　　　　 （　´∀｀）（ 厨 ） )）　＜　　夏だなあ〜
　/////// 　　　　 （つ　へへ つ　　　　　 ＼＿＿＿＿＿＿
///////　　　//△ ヽλ　 ）　）　旦
//////　　l￣￣￣￣￣￣￣￣￣￣￣l
/////　　　￣| .|￣￣￣￣￣￣￣| .|￣
////　　　　　^＾^　　　　　　　　　 ^＾^

　　　　　２ｃｈの夏。厨房の夏。

Swig使っている人募集！ここで有効性を語ってみてください！

よーするにこのスレには上級者がいないってことでいいか？

Swig　ってなに？

[cygwin ディレクトリ]
/lib/swig1.3:
rray.i cmalloc.i exception.i mzscheme pointer.i tcl
array.i common.swg guile objc.i python timers.i
arrays.i constraints.i java perl5 ruby
data.i cpointer.i math.i php4 swig.swg
------------------------------------------------------
XSとの違いがよくわからんが
PerlからCを使う！（Perl限定) = XS
Perlからや他の言語からCとか使う　= swig

　　　　　　　　　　　　　　　　＼　│　／
　　　　　　　　　　　　　　　　　／￣＼　　 ／￣￣￣￣￣￣￣￣￣
　　　　　　　　　　　　　　　─（ ﾟ ∀ ﾟ ）＜　.IDがXS！
　　　　　　　　　　　　　　　　　＼＿／　　 ＼＿＿＿＿＿＿＿＿＿
　　　　　　　　　　　　　　　　／　│　＼
　　　　　　　　　　　　　　　　　　　 ∩ ∧　∧　　／￣￣￣
￣￣￣￣￣￣￣￣＼∩ ∧　∧　＼（ ﾟ∀ﾟ）＜　XSーーーー ー！
　XSSs！　　　　　 　 ＞（ ﾟ∀ﾟ ）/ ｜　　　　/　＼＿＿＿
＿＿＿＿＿＿＿＿／ ｜　　　 〈　｜　　　｜
　　　　　　　　　　　　　 /　／＼_」　/　／＼」
＿＿＿＿＿＿　　　　 ￣　　　　 / ／

このスレ1時間以上トップにいるのか、、、過疎っぷり

初心者コーナースレに書いたら怒られたんで、こちらに。

windows上でjperl使ってて、
Runtime Exceptionって出てperl自体がこけるんだけど、
逃げ方がわからない。正規表現に負担をかける 処理を
多用するとなんとなくまずい感じ（64k制約の話を聞いたことがあるけど、
漏れの場合、扱ってる個々の文字列の長さはせいぜい2k程度）

だれか教えてちょ。
こける場所は不定。デバッガかませると動作完了したりする
ときもある。

初心者スレの>>412 >>447です。

>>172
ソース見ないとなんともいえないよ。ソースは？

>>173
ソースはかなりでかいんだけど。少なくともここに貼れる量じゃない。
落ちる場所が不定だから、当該箇所を示すというわけにはいかないんで。

>>174
どっかにアップしたら？

もう一点問題が。対象dataの過半が外字領域のものなんで、
貼ると、処理部分が空白になってしまう。

>>176
ああ言えば、上祐ですか・・・

結局、ソースを晒したくないだけなのね。

>>175
うーん、それしかないのかな。
ただ、>>176で書いたように、SJISの外字領域を多用しているdataが
対象なんで、scriptに適当なdataを食わせても、完全にスルーしてしまう。
で、dataの方はお客さんの社外秘dataなんで公開するのはまずい。
（scriptも権利とか言い出すとちょっとグレー）
ちなみに、windows2000, windowsXP Pro, windowsXP homeでいずれも
状況好転せず。

全然スレ違いなんだけど、VFlibでwindows外字eudc.tteを使えるもしくは
変換して使えるようにする方法があれば、一番ありがたいんだけど、
知ってる人いないかな？

じょ、上祐…

ともかく、好意でデバグに付き合ってくださる方々に失礼の無いように。
それだけでかいサイズのソースを解析してくれると仰っているのですから。
無料で。

>>177
確かにそう言われてもしかたないんだが。

で、そのでかいサイズって何メガ？ 何ステップ？

それすらも書かない不親切なお人。

Windows 上でウィルスチェッカーを常駐させていると実行時に
Error! Runtime Exception
が出る場合がある。（Namazuより抜粋

JPerlがらみのパターンマッチにおいて、文字列の先頭から調べていく場合、
二バイト文字の文字境界を間違えるのは、二バイト文字の第一バイトの直後を
文字境界と誤認識した時

上級者を名乗るにはどれくらいのスキルがいりますか？

>>184
まぁ、Ｐｅｒｌ言語がつくれるくらいあれば充分だろ

上級者の方
いたら返事してください

なにか？

はーい

？

　　寝る前のﾎｼｭﾎｼｭ
￣￣￣V ￣￣￣￣￣￣￣
　　　　.∧∧
　　,.、,(ﾟДﾟ )　　　　 　／i
　;'｀;、.　:,.:∪｀ﾞ:ﾞ:｀''':,'.´ -‐i
　'､;:.: .､.:',.: .:: _;.;. :.‐'ﾞﾞ~ ￣
　　｀｀　U U 　

上級者はこんなところにうぇｈちうおうぇｇえｒｙふ
ｔ６うｋ９うｇ９０うぇえｒｇｓｄふぉｊｖｄｓｖ＠
でごれ「ぎれｇ＾れｇれせおｆｗｙ８う゛ぃおｄしｆ
ｖほれｈｇ絵ｒｐｋｙｇｒちううとｊびｆｖｈんｂ；
ｄｓｆほえいｒひょいいおれｈｒｆｇｆｇｆｇｆげ３

また、rubyキティか。

>>185

Perl言語だってよ（ﾊﾞｰｶ

HTTPプロトコルみたいなもんか…

ム板の「Perlについての質問箱」がruby基地外によって潰されました。
心ある人は、rubyスレにお礼参りしてください。

↑rubyキティ？

なんでもいいから上級者の蘊蓄希望

「上級者」なんて恥ずかしいね。

お前みたいな小者にはな。

　　　　　_,,,...... . . ----------- .....,,,,_
　 　 　 /――ｒ''''"~~~「 r''''"~￣￣￣~`;､
　　　　/　　　 ;!　　　　 '!:l,　´,_ゝ`）　　　':;、
　　　/ゞ..,,_＿,;!..........(ﾆi.,i 〉、　,,,,,.... .............,)}...,,,_
　　/　　　　 /-　　　　 ﾞﾞ:,　　　　　　 ,,._　　　　　￣｀,;ｒ-、 　　／
　 {,,r=､,　　 i　　　　　　　:, 　　　 　 （::::）r;:=＝＝＝=i､.,;! 　 　>
　 ;!,r=､i:! 　 :　　　　　　　,:'"三ﾐ:､ 　 　,','（::）:;:;:;:;:;:;:;（::）:| 　＜　（　´,_ゝ`）ﾌﾟｯﾌﾟーーーーーー！！
　 Y!　 |ゞ- ..;,,,,,, ____　＿,!:;;r'~`;,:ゞr---ゞ＿ニｒ―‐i=＝) 　　 >
　　iヾノ:;;ﾘ　￣~~~`'''''―' :;|　　ﾘ;;;;;!二二..,,,,,,,,:!---',,;:;:;! 　　　＼
　　 `'''''"　　　　　　　　　 ヾニ"::ノ　　　　　　　 `''''''''"

（＾＾）

（＾＾）

（＾＾）

　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）

>>184
オブジェクト指向
リファレンス
を普通に使えれば上級者としよう。

って、もしかこんな古いスレ上げたら迷惑…？

さむい

あつい

ぬるい

ぬるぽ

　 （　・∀・）　　　|　|　ｶﾞｯ
　と　　　　）　 　 |　|
　　 Ｙ　/ノ　　　 人
　　　 /　）　 　 < 　>__Λ∩
　 ＿/し'　／／. Ｖ｀Д´）/
　（＿フ彡　　　　　 　　/ 　←>>209

>>205
俺は自作スクリプトはオブジェクト指向で組まないと
気がすまないようになってしまったが、
上級者かどうか自分にたずねてもTrueは返ってこない。

if ( $self->is_higher_rank ) {
print "Yes!";
} else {
print "No!";
}
# No!

こんな感じだ。
まだまだ学ぶべきことがいくらでもあると感じている。

あっそ。

━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━―

　　　 　∧＿∧
ﾋﾟｭ.ｰ　(　　＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
　　＝〔~∪￣￣〕
　　＝ ◎――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉

上級者の皆さん。教えてください。
パールから外部プログラムを動かす方法です。

Windowsで動くコンソールプログラム「a.exe」は「a.exe [file]」のように
引数を受けてjpegデータを標準出力に吐き出します。

これをパールプログラムから呼び出して、これも標準出力に吐き出す仕組みです。

つまり、xxx.cgiを呼び出すと、a.exeが作った****.jpgが返ってくるというものです。

要するに、***.exeに仕事をさせて、その結果を受け取るパールコードを教えてください。

>>215
ここはそんなこともわからない初心者が来てはいけません

>>216
だって、初心者の方のスレは、ほんとに初心者っぽい質問ばっかだったから・・・

そんで、こっちに書いてみたんだけど。
どう？分かる人いないの？

http://homepage.mac.com/hiroyuki44/

質問の仕方も上級者でないとなー。

>>217
分かる人はたくさんいますが、答えようとする人はいません。

最近Perlのメモリ管理の甘さが気になってきた今日この頃。

>>221
たとえば？

215って本７だったのか。納得。

>>215
「パール」などと呼ぶウルトラ初心者は初心者スレでさえ珍しい。

>>223
違うよ

>>222
ソケットでデカいデータを受信中にヌラウザの更新したりとかを連続でやると
プロセスが残っったまま別スレッドを作りやがる。それが貯まってしまいに落ちる。
あとﾒﾓﾘじゃないけど排他制御の作業中に更新やら切断を頻繁に行うとロックファイ
ルが消しきれない。ただでさえ排他制御が自前なのにさらにロックファイルの鮮度を
調べる行程まで出てくる。結局PHPで書き直してこれ作った

http://2chlog.net

>>224
違うの！？ずとパールだって思ってた。
確認の為すんませんが間違えてたら指摘してください。

Perl ﾊﾟｰﾙ PHP ﾋﾟｰｴｲｼﾋﾟｰ　CGI　ｼｰｼﾞｰｱｲ
２ch　にちゃんねる 本７　ﾎﾟﾝﾁｰ
Apache　ｱﾊﾟｯﾁ　　Windows　ﾋﾞﾙｹﾞｲﾂ

>>225
それって、単にそのプログラムのデータ構造とアルゴリズムを見直せば
解決するように思えるけど。。。
ヌラウザの更新時にはインタラプトなりのシグナル送ってる？
デッドロックが残るのはソース見ないとなんとも言えないよ。

>>227
いちいち相手にしなさんな

>>227
ソケットはGETメソッドでプレーンテキストを読み込むだけ。
でも根本的にHTTPDとシームレスじゃないからどうしても突発的な処理の
中止が起こると幽霊プロセスになって残る。HTTPDの問題もあるけど。

ロック残りに関してはロックした瞬間に強制切断とか更新がかかるとどうしても
残る。自分でかけたロックファイル読んでるみたいね。Perlでは慣例的に行われ
るそういう例外処理も即時性が問われるプログラムで高効率化を計る際にボトル
ネックになってくる。
せめてPerlの様式でバイナリが吐けるコンパイラならこれからの優位性も出てくる
だろうけど。アプリ開発におけるVBとかと同じポジションになりつつあるんじゃない
のかな。ま、Perlをきちんと身につけてる人ならどんな言語でも対応出来るだろうけ
ど。私も随分お世話になった

>>229
君は自分の知識以外の技術は存在しないとでも思ってるのか？

>>230
そんな事は思ってないよ。何か反論あるなら具体的な解決策を挙げてみてよ。
私は言語を変えるという解決策を取った

>>231
227でヒントをくれてるようだけど、再度。シグナルについてはスルーですか？

またこんなところで繁殖か。たいがいにせぇよ。
> そんな事は思ってないよ。何か反論あるなら具体的な解決策を挙げてみてよ。
相変わらず無限ループ。結局漏れの忠告は放置かよ。

世間一般的にこんな物腰の香具師に対して、まともな意見なんて述べようという気持ちは失せるけどな。
根本的に単純if構文のみの思考回路。ネスティングされたswitch case default構文なんて微塵も考えてもいないんだろうな。

ここしばらくは心穏やかに眺めていたけれど、そろそろ我慢できなくなってきたらしい（w＞漏れ

>>232
あまり使った事ないですけどそれも結局例外処理ですよね。時間を切り詰め
たいんで中断処理自体をしたくなかったんです。もしやるならスクリプトの冒頭
で -eとループ回数で確認する程度です。

でもシグナルで始末する方がいいかもしれないですね。

>>226
ネタか？　バカか？
PerlはPerlって書けばいいだろ？
それをわざわざ「パール」とかカタカナ表記すんのがウルトラ初心者だって言われてる原因だろうに。
あと、ＰＥＲＬとか全角で書くやつとかな。

その前に口から文字だす方法を教えてください

ｸﾞｼﾞｯﾌﾟ

なんでWeb関係の板のコテハンは揃いも揃ってヴァカばっかりなんだ？

逃げ口上だけは得意だな

こんにちわ。また来ました。
寂れてると思ったんですが、結構書き込みがあるんですね。

それはそうと、どうですか？分かりませんか？

今は、IISでASP（ブイビースクリプト）にこの中間作業をさせてるんですが、
こんな感じ↓
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("a.exe -option ***.file")

このあと、oExecの標準出力プロパティをいじるんだけど。

パールならこの「exec」に相当するのは何かな〜？って思ったわけ。

この中間プログラムは、「a.exe」とユーザーのリクエストの中間で橋渡し役をするものなので、
リクエスト処理が必要になるため、パールの方が簡単です。

この「Exec」の部分が分かればね。
ヒントだけでも教えてください。後は調べるから。

あ、でも、最初から調べろ！って意見はパスね。
それなら、はじめから聞かないからね。親切に教えてほしいな。

そんじゃ、また来るから。よろしこ

>>241
二度と来るな。死ね。

>>225
読んだ感じ、お前のプログラムが糞である可能性が一番高いとしか言いようがない。
Perlほど実績がある言語にバグがあると主張するなら、
普通トレースなりして客観的な証拠出さないと相手にされないよ。
まあ、君みたいに、自分の思い通り行かないと、他に責任転嫁する人たくさん居るから慣れっこだけど。

>>243
その根拠は？

>>244
”その”は何を指してるのか不明。
マジ先に日本語勉強したほうがいいよ。

骨のないヤツだ

自分の思うように動かないからPerlは糞なのかぁ・・・
普通は逆だと思うけれども。

どんなものにも限界はある。これれからの可能性考えればPHPに移るの
も自明の理だよ。Perlに固執する理由がないと思う。

老人には厳しい様です。

まるでperlの限界を知っているような口調に笑った。
1を知って100を知った気になるあたり厨そのものだな。

Perlで100を知る必要があるんだろうか

Perlがコンパイラになって飛躍的な高速化が図れるなら生き残る道はあると
思うが。CやDelphiに取って代わるバイナリCGIとして大手を振る事は出来る
んじゃないだろうか

コンパイラありますね

>>253
まあ、もう一つ忠告をするなら、生半可な知識で物を語ると
笑われたりバカにされたり憐れみの目で見られたりすると言うことだな。
それを望んでいるのなら止めないが、
自分を他者に認めてもらいたくてそんなことをしているのだとしたら、やめた方がいい。いやマジで。

笑ってください。

perl2exe落としてみた

おそらくPerlを1しか知らないからいろいろと口走るんだろうな。
そんな香具師がこのスレッドに光臨だとは。とほほ。。。
↓
じゃPerlの100を教えてくれませんか？
といってもPHPの100の方がありがたいけど。
↓
おめえなんかに教える気はない。さっさと消えうせろ。
↓
どいつもこいつも必死だな。一生Perl厨でいてろ。
↓
（放置）
↓
次はぃぬ板あたりに現れる。（w

と予言してみるテスト。

おそらく説明書きも読まずにperl2exeを落としてきたんだろうな（w

>>254
これまでの登場したスレッドの軌跡を見ればそれこそ「自明の理」だよね（w
それにまだ気が付かないでいるのか、薄々感じているのか、はたまた、それに快感を得ているのかは分からないけれども。

BBSのCGIでテストしたけど普通にPerl起動した方が早い気がした。
中に実行コンポ入れてるだけだからあまり変わりないのか。
ネイティブコ−ドが吐けなきゃ意味ないって事か。

>>256
> 次はぃぬ板あたりに現れる。（w

鯖管理初心者質問スレッド Part1
http://pc.2ch.net/test/read.cgi/linux/1025755159/571

これか？

本７は根本的に頭が悪いからな。
物事を評価するときの器が狭い。

Perl　＝　CGIだけの言語と思ってる、
変なヤツがいてるスレはここですか？

このスレ進まないから「上級者本７を語るスレ」でもいいかもな

えー、期待はしていなかったのですが、やっぱり質問に答えられる人はいないようですね。

とりあえず自分でも探してみますので、君たちの中に分かる人がいれば書き込んでみてください。

いまのところパールでなくても良いので、ぼちぼち探しながら、ときどきこのスレを覗きにきます。

ところで、パールの上級者とはどのような基準ですか？
パールのユーザーとして使用方法に精通しているということにおいて上級なのか
言語開発者の端くれとしてパールの設計に関して知識があることにおいて上級ですか？

このスレは、当然ユーザーとして使用方法に詳しい人たちが集まるスレだと思い、
質問してみましたが、皆さんも、やっぱり誰かに教えてもらったりして身に付けたんでしょ？

意地悪しないで、書き込んでみなさい。

たった、数行でしょ？

>>264
スレタイは、ネタだろ。
もし、スレタイを信じて、本当にここが上級者コーナーだと思ってたなら、
はっきりいって、迷惑なレベルの低い質問だな。

初心者スレへ行け。

たばこみたいなやつ。

つーか、煽れば聞き出せるだろうという頭の悪さが…

ほんと、質問のたった数行のコードさえ書けないくせに
あんなに長々とカキコする頭の悪さ・・・

>>264
漏れは厨1からずっと独学ですが、この業界はそういう人が多いかと。

君の今後の人生のために調べ方を教えてあげよう。

http://www.google.co.jp/ にいって、
「Perl 外部プログラム」 と入力し、[google検索] ボタンを押してみよう。
以上。

なんだかどのスレッドにもアレの臭いが漂っているようだが。
真剣にアレの進入禁止方法を検討せねば。

ぽんななは自己顕示欲のかたまりだから名無しでは書かないだろう。

215は釣りだろ。

釣りか天然か知らんが馬鹿であることに間違いあるまい。

ﾊｧ?調子ノンな。お宅度もも。

↑厨房指数120

馬鹿は侮辱にとても敏感。だから馬鹿にされると黙ってられない。
だから「馬鹿にすれば答えを書くだろう」という厨房丸出しの思考をするのだろう。
残念ながら、君以外は答えを知ってることは明らかなので、知ってる事を証明するために書く必要はない。

おとなしく初心者スレで質問しときゃレス付いただろうに…
今からでも遅くないから初心者スレ逝きなさい。



と書くとこういう馬鹿は絶対に逝かない事もわかってて書いてみるテスト。

わからないんだったら、最初からレスするなよ！！！！！！！！！
お前らお行って腰！

> 標準出力に吐き出します。
> に仕事をさせて、その結果を受け取る

ここまで分かっていてどうしてあれを思い出さないかなぁ。釣りか？

馬鹿なんだよ。

スレッドがゴミで埋まるってのももったいないなあ。
encodingのバグ報告にでも使う？
つーても、この板じゃ5.8使ってるやつ少なそうだし。

>>280
使ってます。




この板で、なんかｹﾞｰﾑでも作ってみたいなぁ。

>>281
おっと間違えた。215じゃないよ。自演して遊ぼうとなんかしてないよ。
まちげぇた。

ま、あれを知らなくてもインストールなら猿でも出来るからな。(w

なんか、サゲて書いてる偽者の人がいるのですが、困りますね。

>>269
グーぐるで探したことはあります。結果、「$a=system('a.exe ***.file')」
というのが有力ではないかと思ってますが、これでいけるということですか？

これでいい場合、$aに受け取るサイズに限度は無いのでしょうか？
数kByteから数MByteまで受け取る可能性があるんですが・・・
あと、これはブロッキング処理になるんでしょうか？
a.exeはそれなりの計算をするプログラムなので、結果は小出しになります。
$aは標準出力を受け取るのでブロッキング処理でないとこういう記述はできないと思いますが・・・

このことから、単純に「$a=system('a.exe ***.file')」ではうまくいかないような気がします。
これはASPでいうとRUNに当たるんじゃないかな？
標準出力じゃなくてプロセス結果を返すんじゃないの？

いまんとこ、これしか見つからなかったんだけど、別のほうほうがあるんでしょ？
ねぇ、早く教えなよ。やったことあるんでしょ？

まさか、駄レス並べて1000までいく気じゃないよね？

>>284
駄質問を堂々とこんなスレでする君がいる限り1000も夢ではないぞ

馬鹿だからやっぱり出て行かないな。

>>284
バカすげー。
試すと言う言葉の意味を知らん。

パイプじゃだめなのか・・・？

禁煙パイポのほうがいいだろ

いっその事、こっちはこういう馬鹿や、シンタックスエラーもとれないウルトラ初心者の
隔離スレにしたらどうだ?

PHPでいいよもう

>>291
うわ…ここにもいるよ。キモッ

(ﾟДﾟ;≡ﾟдﾟ;)な、何がいるの？

>>293をさらしあげ

>>284

>これでいい場合、$aに受け取るサイズに限度は無いのでしょうか？
>数kByteから数MByteまで受け取る可能性があるんですが・・・

どういう経緯でこういう発想に至ったのかを教えてくれ……

>>284
Perlの仕様を知っていればそもそもそんなアフォな質問は出ない。
これはつまり、貴様が初心者以下であることを物語っている。
よって、そんな貴様が上級者コーナーにいること自体が間違い。

>>284
system使うのにlist形式ではなく一文で書いてshに渡してる時点でヘタレ。
``すら知らない時点で(ry
openの使い方(open(FH,"$prog|"))を知らな(ry

>>295
そもそも何でこいつはsystemで起動したプログラムの出力を
取れると思ったのか、俺も興味ある。

馬鹿だから

案外、本７だったりしてなｗ

>>299
アリエール漂白剤プラス。

300下t

このスレ、いらねんじゃねぇ。

　__∧＿∧_
　|（　　＾＾ ）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣

　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）

　　　 　∧＿∧　 ∧＿∧
ﾋﾟｭ.ｰ　（　 ・３・） (　　＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。
　　＝〔~∪￣￣￣∪￣￣〕
　　＝ ◎――――――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉&ぼるじょあ

　　　 (⌒V⌒)
　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン

で、>>101は解決したのかね？
もう随分前の話だが。

>>306
ファイルアップロードが上級者向けの話題とは思えんなぁ。

ここに書き込む資格があるか疑問ですが……。

名前付きの引数でサブルーチンに配列を渡そうとしているのですがうまくいきません。

呼び出し側は
hoge = subsub(ItemCode=>1, ItemText=>'hogehoge', \@ItemValue);

受取側は
sub subsub()
{
my %args = (
ItemName=>0,
ItemText=>'',
ItemValue=>undef,
@_, );

としています。これで@$ItemValueとか$ItemValue->[0]という形で配列を使いたいのですが、配列の内容が取り出せません。
呼び出し側のItemValueには配列が入っていること、subsub側の引数には（正しいかどうかはともかく）リファレンスは代入されていることは
確認しましたが、これ以降どうしたらいいかわかりません。

何かご存知の方がいらっしゃればアドバイスをお願いいたします

……書き込んで解りました。
呼び出し側に引数名書いてない(T_T)

……と思ったら、今書いてあるコードにはちゃんと書いてありました(^^;

呼び出し側を
hoge = subsub(ItemCode=>1, ItemText=>'hogehoge', ItemValue=>\@ItemValue);
と訂正してください。

>>310
後半も意味不明でしたね。受取側では
@$args{ItemValue}とか$args{ItemValue}->[0]という形で使えれば、に訂正してください。

ちなみにプロトタイプ宣言を試して見たのですが、やはりダメでした。
sub subsub($$\@)としても、$args{ItemValue}は空の配列のままです。
join(',',@_)ってして「ARRAY(0x833b5e4)」とか出てくるのは、一応リファレンスは入っているのですよね？

>hoge = subsub(ItemCode=>1, ItemText=>'hogehoge', ItemValue=>\@ItemValue);
これなら
$args{'ItemValue'}->[0]
でできない？

一度、@ItemValueの中身を確認した方がいいかも。
煮詰まったときはお茶かコーヒーで一服どーぞ。

解りました。引数まわりはあれでOKでした。

受け取った後、foreachで内容をチェックしていたのですが、
foreach @$args{ItemValue}では（エラーにはならないけど）×だったのです。
こういう使い方をするには
foreach @{ $args{ItemValue} }と書かなければならないのですね。


>312
>313
アドバイス、ありがとうございました

何度も申し訳ありません(^^;

CGI::new()で得たCGIハンドルから、postで与えられたパラメータを全て、名前毎に値を取り出すことは出来るのでしょうか？
……要するに、postで来たデータをgetのクエリー文字列に直したいのです(^^;

ただ、数が多いのとcheckBoxがらみで同じ名前で複数の値があるものがあるので、どうしたものかと考えているところです。
もしご経験のある方がおられましたらアドバイスをお願いします。

http://jbbs.shitaraba.com/computer/8727/
史上最大よ！！！
100％来なさい！！！！

>>315
既に存在するキーならば、\tを付け加えてその値を付加してみるとか。
if (!defined %hash{$key}) { %hash{$key} .= "\t$value" ; }
みたいな。

1 つ 1 つの値を取り出すときには、split(/\t/,%hash{$key});
みたいな。
みたいな。
みたいな。

結局ここは初心者コーナーということ？

>>315
my $query = new CGI;
...
foreach($query->param){
print $_, " = ", join(',', $query->param($_)), "<br />\n";
}

こういうこと？
POST->GETへ直したいの意味がよく分からないけど。。

それから、質問はなるべくこちらへ。
Perl コーディング初心者質問コーナー Part28
http://pc2.2ch.net/test/read.cgi/php/1063562491/

sub function}

{

なんとなくこれで良さそう。

$str = join('&', map { my $key = $_; map { join('=', $key, $_) } $query->param($_) } $query->param);

>>319
そのとおりです。どうもありがとうございました。
それでは後は初心者スレに行きます。ご迷惑をおかけしました。

>>317はPerl6を先取りしているのですか？

すんまそん。
初心者スレで大分前に質問(詳しくは:http://pc2.2ch.net/test/read.cgi/php/1063562491/13)したのだが、
Perlで組み込み関数のリファレンスを取得するには、
どうしたらいいのでしょうか？

>>324
perldoc -f funcname

そのリファレンスかよ！

取れないくさいよ。。というわけで、

$symlink = sub { symlink(@_) };

>>327
組み込み関数は、演算子に近い扱いなんですかね。
リファレンスが取れると、似たような関数のスイッチに便利なんだけどなぁ。

ありがのん御座いました。

オブジェクト指向ならadapterパターン使って解決(大嘘。

times関数について聞きたいのだが、
・実行中のプロセスが消費したユーザCPU時間
・実行中のプロセスが消費したシステムCPU時間
この２つの戻り値の意味と違いを説明できる人いないかな？

>>330
http://search.luky.org/fol.2000/msg00144.html

■日本人プログラマーよGoogleを攻略せよ　2003年09月24日 CNET Japan - 梅田望夫・英語で読むITトレンド： http://blog.cnetnetworks.jp/umeda/archives/000697.html

Google Code Jamというプログラミングコンテスト(CNET Japan速報記事「米グーグル：「プログラミングコンテスト出場者を求む」」をご参照)が10月から11月にかけて開かれる。
参加資格は18歳以上(世界中の誰でも)。予選はオンラインで、決勝(トップ25人)はシリコンバレーのGoogle本社で行なわれる。
腕自慢の日本人プログラマーたちには、この機会にぜひその実力を発揮してほしい。

Google Code Jamのファイナリストといえば、これから腕一本でプロとして生きていきたい若い人にとっての大きな勲章になる(中途半端な学歴なんかよりうんと価値がある)。
ファイナリストに残る日本人がいれば、日本人プログラマーの実力が世界でもトップレベルにあるという事実を、広くアピールできるだろう。
さて、コンテストの仕組みとスケジュールであるが、

参加者全員から500人にふるい落とす「Qualification Rounds」、
500人を250人に絞る「Online Elimination Rounds 1」、
250人から25人に落とす「Online Elimination Rounds 2」。
ここまではすべてオンラインなので、自宅から参加できる。
そして、ファイナリスト25人はGoogle本社での「Onsite Championship Round」に進むことができる。

★google code jam 公式サイト(excite翻訳)　http://www.excite.co.jp/world/url/body?wb_url=http%3A%2F%2Fwww.topcoder.com%2Fpl%2F%3F%26module%3DStatic%26d1%3Dgoogle%26d2%3Dgoogle_overview&wb_lp=ENJA&wb_dis=2

関連スレ
【IT】Google、人材採用兼ねたプログラミングコンテスト　http://book.2ch.net/test/read.cgi/bizplus/1063972616/
Google、人材採用兼ねたプログラミングコンテスト　　　　http://pc.2ch.net/test/read.cgi/prog/1063960893

スレ違いだったらすいません！

自作のHTTPクライアントを2chのdat落ちにも対応させたいんですが、
そのことについて解説されたページのアドレスを忘れてしまいました・・・
そのページをご存知の方（分かるかな・・・）、アドレス教えてもらえませんか？
ｸﾞｸﾞっても見つかりませんでした・・・

>>333
http://www.monazilla.org/document/index.html

どこのどなたか存じませんが、ありがとうございます！

てか、こんな有名所だったのか・・・。
個人のサイトだったかと勘違いしてました。

せめてお名前だけでも・・・

徳岡伸○と申します。

誰。

↓

お、俺かよ！

↑

誰。

上級者って言うか低脳が集うスレだな

勃っちゃた

逝っちゃった

しごいて・・・

>>346
腕立て100回！腹筋100回！そこっ！休むなあーっ！！

イク・・・

リプス ってどうよ

--

CANONのプリンターのページ記述言語？

http://japan.pinkserver.com/mariko/7254.html

age

NTサーバ、IIS、ActivePerl5.6にて、メール送信するプログラムを作成しています。
(SMTP: Microsoft Exchange Internet Mail Service Version 5.5.2653.13)
モジュールNet::SMTPを使用して、CGIのメール送信フォームで入力されたものを送信
するようになっています。

そこで、問題なのですが、
メールのFrom:に、"氏名 <[email protected]>"というような形式を使用すると、
送信に失敗してしまいます。メールアドレスが裸の状態だと、正しく送信されます。

文字のエンコード方法がいけないのかと思い、"Name <[email protected]>"という
ように、ASCIIのみにしても送信に失敗してしまいます。

Fromに設定できる、メールアドレスのドメインが限定されているかもしれないので、
メールアドレスをサーバのドメインに合わせましたが、それでもだめでした。

また、To:に複数の送信者を設定(カンマ区切り)した場合も、同様な問題が発生しました。

どなたか、解決方法をご存知でしたら、ご教授ください。よろしくお願いします!!

> 送信に失敗してしまいます。
失敗の仕方もロクに書かずに助言を求める馬鹿がいるスレはここですか？

>>354
funny user@domain 間違い
"funny user"@domain 正しい, 推奨
<"funny user"@domain> OK

というか，ダブルクォートしてて@hogeが展開されてるってｵﾁでないか？

>>357
>メールアドレスが裸の状態だと、正しく送信されます。

つーか、あれが上級者の質問なのか？

ttp://res9.7777.net/CGI-BBS/server/mail/20030925151017.shtml

>>354は「ＣＧＩ習熟度：pro」だそうだｗ

proどこ行ったの〜？ｗ

Telnetでサーバーに接続して
Perlプログラムを実行する際に
フォームデータを引数として与えて
実行する方法を誰か教えてもらえないでしょうか？

教えてもらったんですけど使い方
忘れちゃいました

・・・。

>>362
マルチすんなボケ！

>>362
２ちゃんねるにはつわものは
いないんですか？
いると思ったのにがっかりだ。
明日、教えてくれたシステム部長
にもう一度聞くから良いよ

>>365
マルチすんなっつってんだろ。
ルールを守らない奴になんで親切にしなきゃならんのよ。
マジで自分のことしか考えてないDQNだな。

>>365
お前本当にどうしようもないクズだな。
まず2ch（だけではないが）のルールを守れやｳﾞｫｹ。

システム部長もこのスレ見てるyo

>>367
お前ぶっ飛ばすぞ！！！
顔が見えないからっていい気になりやがって。

>>369
お前、上級者にむかってその態度はなんだ！！！
童貞のくせにいい気になりやがって。

>>370
童貞ではありません。

>>369
最初にいい気になってるのはどう見てもおまえなんだがな。
自分が質問者としてのルールを守っているかどうか、少しは考えたのか？

『Perl コーディング初心者質問コーナー Part31 』でも質問したのですが、
分かる方がいらっしゃらないようなので、ここでもお願いします。もう誰もいない？


ファイルハンドラを変数で持つことは可能でしょうか？
my $p;
open($p, "test");
こんな感じで。
-----------------------------------------------
my $p="a"; としてからopenすると何故か動くのですが、今度は、use strict
の場合に、

#!/usr/bin/perl -w
use strict;
my $p="a";
open($p, "test");

こうすると、以下のように怒られます(実行ファイルは./aです)。
Can't use string ("a") as a symbol ref while "strict refs" in use at ./a line 4.

何故なんでしょうか？
（そもそもファイルハンドラの定義がよく分からないのですが。ポインタ？）

perldoc -q filehandle して

"How can I use a filehandle indirectly?"

perldoc Symbol も良い

>>373
わかる人がいないんじゃなく最近既出の質問
過去ログ嫁

>>376
失礼しました。探してみます。

>>377
英語読めんか。
洲万買ったな。

みんなのPerlソースのコメントアウトレイアウト見てみたいかも。
どんなコメントを書けば見やすいのか研究中。

とりあえず、

#==========#
# 処理名 #
#==========#

とか、

#>>>>> 処理名

とか書いてる。
一応それなりに目立つし、全部 # で書くとｳｻﾞｲから

###########
# 処理名 #
###########

こんなんとか。
見にくい。。。

みんなはどうだ？ﾁｪｷﾗ

行コメント以外ならPODで書いてるよ。See perldoc perldoc, perldoc perlpod ...

######################################################
## ■以下サブルーチン■
######################################################

##====================================================##
## ■以下サブルーチン■
##====================================================##

>>379
POD 使えば？
コメント使った書き方って、見にくいし、他の人のコードと統一性が取れない。
整形するの面倒だし、マニュアルも別に書かないといかん。
じゃあメリットがあるかっていうと特別あるわけじゃない。デメリットだけ。
まともなエディタを使えば、POD のところだけ色も変わるから見栄えを気にする必要もない。
あと俺の主観だけども、出来の悪い CGI のコード見てるようで、醜い(シャレじゃなく)。

すでにあるモノを再発明することないよ。更に良いものが作れるのなら話は別だけど。

大規模なコメント（ドキュメント）なんかは
そりゃPODにこしたことはない罠。

ちょっとしたコメントにセンスを光らせたい罠
別に誰が見るわけでもないんだけどさ。

ちょっとしたコメントに大袈裟な装飾は不要。
罫線くらいにしておいた方がいいんじゃない？

#::::::::::::::: さぶるーちん :::::::::::::::#

#
# こめんと
#

シンプルな方がよし。かも？

>>381,382
■を使うと見やすいな。

#■ コメント１
print ...

#■ コメント2
print ...

統一的にどうするかというより、
#**************************#
#. 大見出　　　　　　　****#
#**************************#

#--------------------------#
#..中見出　　　　　　　----#
#--------------------------#

#--------------------------#
#... 小見出

# その他

　のように、階層に応じて分けるのがいい。ちなみに、「#.」、
「#..」、「#...」の部分は、テキストエディタに「アウトライン」
機能があれば、その見出し行の識別文字列に設定するとよい。

上級者のみなさん質問させてください！
ソフトバンクより発売のCGI/Perlハンドブックという本で
http://up.atnifty.com/upload/file/20040120011644_.txt
こういったアンケート収集スクリプトがあるのですが
これを実行してもアンケートが追加されません。
どこが間違ってるのでしょうか？

>>390
ﾏﾙﾁﾎﾟｽﾄﾊｹｰﾝ

>>386-389
そういう書き方するとＰＯＤに比べて何かメリットは？

>>387 は楽だって点でメリットがあるけど、他のは…。

>>392

メリット：見やすくなる（色分けしてるエディタだと更に
デメリット：めんどい。

>>387は後でソース見て苦労するタイプだ

>>393
POD も色分けされるじゃん。

出力されたHTMLの一行目が改行になってしまう仕様はどうにかならないか。（英文FAQ翻訳風）

POD色分けされるエディタって何がある?(WINで)

gvim

あげじゃあげじゃ

これと同じ改造するにはどしたらいいんですか神様。

http://ouroboros.game-host.org/index.html

同じ改造で満足するのかと小一時間(ry
小言で400get.

PerlでPGP暗号化したメールを送ったことのある方おりますか？
gnupg等のコマンドを使って暗号化したものを、
sendmailで送るイメージでいるんですが、
この辺をやってくれるモジュールとかってあるんですかね？

>>388
なるほど！
そういえば、携帯ﾍﾟｰｼﾞつくるときによくつかってたけど、ｺﾒﾝﾄで使うのは思いつかなんだ。
らりあとう！！

>>402
どういたまして。
ちなみに今は
タブと■を組み合わせて見やすくしてる。

>>401
メールを受け取る人が一定なら、
その人のマシンで公開鍵と秘密鍵を作って、
その公開鍵を使ってサーバで暗号化する必要がある？？
あんま詳しくないから興味あるかも。

>401
ttp://search.cpan.org/

　　　　　 _,,,......,,__
　　／_~　,,...:::＿::;; ~"'ヽ
　(,, '"ヾヽ　 i|i　//^''ヽ,,)
　 　^ :'⌒i　　　 i⌒"
　　　　　 | (；ﾟДﾟ)　＜ 今まで様々な404を見てきたが
　　　　　 |（ﾉ　　|）　　　　　　お前が一番coolですね
　　　　　 | 　　　|
　　　　　 ヽ ＿ノ
　　　　　 　U"U

えらく長寿だなぁ、このスレ・・・勃って（ｗ から三年半、前レス>>405からも一年半経ってる。

pod使ってサブルーチンごとにコメントを挟むと間延びした感じになってなんか嫌だったんだけど･･･
=の前後に空白行がないとpodparserでXHTML化したときにうまく読んでくれないし。

どうよ？

0１と最初からスレタイしたら伸びないというのを実践してるな

ttp://www002.upp.so-net.ne.jp/wing-net/support/

ここのMulti Wing BBSをDLして設定してうｐまで
終わったんですが、メインのwingmulti.cgiにアクセスして
設定したパスワードを入力しても、パスワードエラーと出ます。

何度設定しなおしてもパスワードエラーに引っかかるんですが
これって単なるバグでしょうか？

分かる方いたら、試してもらえませんか？

>>409
もちろんお前はPerl上級者なんだろうな

>>410
初級レベルです＾＾；
上級者の方じゃないと分からないと思ったので、すいません。

質問するスレじゃねぇ

DBICどうすか。
0.5から::Schemaに移行とかなんとか。

wikipediaにはトリップ生成は

$tripkey = "#istrip";
$tripkey = substr($tripkey,1,);
$salt = substr($tripkey.'H.',1,2);
$salt =~ s/[^\.-z]/\./go;
$salt =~ tr/:;<=>?@[\\]^_`/ABCDEFGabcdef/;
$trip = crypt($tripkey,$salt);
$trip = substr($trip,-10);
$trip = '◆'.$trip;
print "$trip";

って書かれてるが

マルチバイト文字をcryptに入れるとエラーになるんだが。

どうすればいい？
Perl5.8.8だからなのか？
誰か教えてくれねーか？

>>414-415
ここは上級者スレ。その程度を自分で解決出来ない奴は立ち入り禁止。

工ｴｴｪｪ(´ﾟдﾟ｀)ｪｪｴｴ工ｗ

UTF8で書いてる所為かも。
SJISに変換して入れてみるか。

うまくいったっぽいｗ

まぁ、ﾃｷﾄｳにまとめ。
しなくてもいいだろうが、スレつかっておいて自己解決して放置っつースタイルが嫌いなので。

俺の場合。
出力をXHTMLに準拠させたいが、ファイルの先頭でXML宣言をするとIEで厄介なので、それを避けるために出力をUTF8にしたかった。
そんなときにPerl5.8は内部処理とかUTF8にしたぞ的なことを知ったので、use utf8;とかしてコードを書いていたわけだが、
UTF8のマルチバイト文字列をcrypt関数の引数として与えるとエラーが出るという問題にあった。

まぁ、crypt使う理由が2ch互換のトリップを生成することだったわけで、そのときにUTF8でcrypt使用としてた辺りがあほなんだが、
1日考えるのやめてカラオケとか逝ってたら、脳みそすっきりしてこのことに気づいたので解決した。

そんでUTF8→SJIS変換したら、すんなり成功した。

参考までにソース載せると

package パッケージ名;
use utf8;
use Encode;
return 1;

sub makeTrip{ # 引数 = \$tripkey(utf8)
my $tripkey = $_[0];
my $salt;
$$tripkey = encode('shiftjis', $$tripkey);
$salt = substr($$tripkey.'H.',1,2);
$salt =~ s/[^\.-z]/\./go;
$salt =~ tr/:;<=>?@[\\]^_`/ABCDEFGabcdef/;
$$tripkey = crypt($$tripkey,$salt);
$$tripkey = substr($$tripkey,-10);
return;
}

超絶的確な>>416のレスを読まない
>>414に萎え

てか、文字コードの違いもわからず上級者気取りか･･･

もうおわったことにぐだぐだいってる >>421 のしつこきもちわるさにほげ

一応天才って言われるけど…これ常套だべ？

BEGIN {
$vo = '栄昇';
$g = '優';
$pf = '等';

}
コードに入れてない奴は今すぐ入れたほうが良いよ、平和になるし

日本語でok

上級者専用スレなんて初めて開いた・・
Gimpって画像処理ソフト、CGIから操るのに成功した人っています？
ImageMagickを使ってみて、なかなか面白いんだけど、文字の加工は貧弱なので
Gimp試してみたものの、全然動かないのです。

>>425
キサマには初心者スレすら生ぬるい。

煽りに用はない！by ken

>>420
では上級者的指摘を

use utf8環境下でsubstrで2文字取り出すというのがどういう意味なのか
分からないのがお前の敗因。
我々上級者はuse utf8はuse byte;は併せて覚えている。

つ〜かcryptの第2引数は初めの2バイト以外無視する仕様だから
わざわざsubstrしてる時点で中級者とも言えない。

って、全くテストもしないで亀レスだけしてみる。

cryptはDESかMD5かで有効なsaltの文字数が違うよ

簡単にお金稼ぎ！！！

以下の手順でやれば、無料でお金稼ぎができます。
企業も広告の宣伝になるから、お金をくれるわけです。
最初の１日目で 2000 円〜3000 円 は確実に稼げます。
実際の作業は数十分程度、１時間はかかりません。

(1) http://pointdream.jp/member_regist.aspx?LinkID=577583#.2ch.net/
　 　↑このアドレスからサイトに行く。
(2)無料会員登録をする。
　※フリーメールアドレスでもＯＫ。
(3)ポイントを稼ぎます。
　懸賞の応募や無料会員登録をすればするほど、
　ポイントが貰えます。
(4) 友達を増やせば、後は何もしなくても
　定期的に、友達還元ポイントがドッサリ入ってきます。

これで現金を稼ぐといいですよ！！！

登録（応募）はこちらから↓
http://pointdream.jp/member_regist.aspx?LinkID=577583#.2ch.net/

簡単にお金稼ぎ！！！

以下の手順でやれば、無料でお金稼ぎができます。
企業も広告の宣伝になるから、お金をくれるわけです。
最初の１日目で 2000 円〜3000 円 は確実に稼げます。
実際の作業は数十分程度、１時間はかかりません。

(1) http://blackjack.lxl.jp/#.2ch.net
　 　↑このアドレスからサイトに行く。
(2) ゲットマネー登録サイトに移動するので、
　そこで無料会員登録をする。
　※フリーメールアドレスでもＯＫ。
(3)ポイントを稼ぎます。
　懸賞の応募や無料会員登録をすればするほど、
　ポイントが貰えます。
　他にも沢山種類があるので、１日目で
　約 20000 ポイントは GET できます。
(4) 10000 ポイントから、現金に交換できます。
(5)キャッシュバックという所がありますので、
　そこから交換をしましょう。

これで現金を稼ぐといいですよ！！！

無料会員登録はこちらから↓
http://blackjack.lxl.jp/#.2ch.net

上級者向けの質問かどうか分からないけれど、他に該当スレが思いつかなかったのでここで質問させてください。

CPANで落とせるNet::SMTP_authってモジュールがあって、それはNet::SMTPのサブクラスになっていて
ソースの中ではauth()とauth_types()のオーバーライドしかしていない。
SMTP_authでメール送信するには587番ポート使う筈で、それはnew()したときの
最初のサーバへの通信で既に「587を使う」と指定しないといけないと思うのだけど
どこをどう探してもその記述が見つからない。
NET::Configの中かなぁと思ったのだけど、それも違うっぽい。
どうやって587ポートを指定させているか、誰かご存知の方いませんか？

SMTP_authモジュールを使いたくて色々調べていたらこの問題に行き着いて、どうにも納得できなくて気持ち悪いので
ヒントだけでも教えていただけると嬉しいです。

>>432
Authen::SASLで何やってるかわかんないけど、ポート指定してるっぽいのはここだね。

my $conn = $sasl->client_new("smtp", $host);#, "noplaintext noanonymous");

>>432
> SMTP_authでメール送信するには587番ポート使う筈
これ間違い。

○ submission portを使用するときはSMTP AUTHが必要。

Net::SMTP->new( Port=>587 );

Net::SMTPなら、こんなんじゃなかったっけ

>>433
ありがとうございます。
まだ色々分かって無いですが、また調べてみようと思います。

>>434
まだ理解が足りていなかったみたいです
ご指摘ありがとうございます。

>>435
そうですよね、やっぱし。
でも587というポート番号を指定してる場所がどこにもなくて「あれ？おかしくね？」
と感じて調べ始めたら泥沼に、、、orz

OP25Bなら、サブミッションポートで接続してSMTP AUTHするわけだから
ポートは自分で設定する必要があるよ。

Perlに触れて２ヶ月余りの者ですが皆様のお知恵を拝借したい事があります。
フォームを作成し、大量の文字を入力してメールを送信するようにすると、
500文字目辺りが文字化けしてしまいます。
その部分から一定の周期で文字化けが発生しています。
300文字程度までなら全然平気なのですが。。
あとそのメールのログをとっているんですけどログの方は大量に文字をうっても問題なく蓄積されていました。
この事からプログラム的な問題ではなく、
鯖にインストールされている sendmail が怪しいかと思うのですが、
バージョンが古いとこのような問題が起こる等、何らかの情報はご存知ないでしょうか？？
宜しくお願い致します。

>>438
2ヶ月で上級者になるとは凄い才能だね。では頑張れ。

>>439
低級者のレスはいりません

>>438
一行に500文字が入っているの？
SMTPの仕様だか、実装だかに一行の最大文字数みたいな制限があったはず。
途中に改行入れていて500文字だったらスマン、わからん。

>>441, >>443-
低級者のレスはいりません。

>>441
どうやらビンゴのようです。
改行入れると化けません。
SMTPの仕様でしたか。。。
この仕様について色々と調べてみたいと思います。
大変参考になりました、ありがとうございます！

完全に文字化けが直りました。
>>441さんに多謝！

>>441

RFC2822によれば、CRLFを入れて1000文字 (オクテット) ですね。
Sendmailでは長い行を自動的に分割します。
500文字というのはShift_JISで書かれた日本語での換算かな?

…とここまで書いて1ヶ月前の記事ってのに気づいた。まあいいや。

Perlからメールアカウントの追加をしたいんですが、どうやったらええんでしょ？
MTAはqmailでvpopmailでバーチャルドメイン運用してます。

root権限もあります。
perlからの会員登録と同時にメールアカウント作成みたいなもんをしたいんですが。

誰か〜〜

助けておくれ＞＜；

UNIXユーザーか仮想ユーザーか、自力でシミュレートして登録するか
外部コマンドを利用するか等で実現方法が変わる。

外部コマンド使う場合
・パイプ、system関数 or バッククォートで外部コマンドを実行
・uidをrootにしsetuidする
・強制的にテイントモードになるのでサニタイズする
ここら辺注意すれば比較的簡単に出来ると思う。

>>448
ありがとうございます。
おかげさまで解決しました。
Insecure $ENV{PATH} while running setuid at ./hoge.cgi line xx.
というエラーが出て少し悩みましたが。

すいません。もう一つ質問です。

setuidでroot権限で実行する方法なんですが、mod-perlだとroot権限になりませんね。
できればmod-perlで動かしたいんですが、方法はあるんでしょうか？

これはまたひどい後出し

>>450
mod_perlの動作原理をちょっと考えればわかることだが、不可能

・BIGSECURITYHOLEオプションでapacheをrootで動作させる。
・外部コマンドを実行するプログラム(setuidされた)をmod_perlから呼び出す。
・sudoを使う
思いつくのはこんぐらいかな。

>>453
ありがとうございます。
apacheをrootで動かすのは怖くてできません＞＜；

2つ目のプログラムを分けてmod-perlから呼び出すプログラムに数値を渡すにはファイル書き込みか何かで渡す他ないんですよね？
これならできそうです。

3つ目のsudoは
perlプログラム内（test.cgi)に以下の外部コマンド
`script /dev/null -q -c 'sudo -u root /home/vpopmail/bin/vadduser -r hoge\@hogehoge.com'`;

visudoにて以下を追加
apache ALL=(root) NOPASSWD: /var/www/test.cgi

で実行してみましたが、secureログには
sudo: pam_unix(sudo:auth): authentication failure;
と出ます。sudoがシンプルで良いと思っているのですが、認証失敗は何が原因でしょうか？

あ。test.cgi自体をsudoで動作させなきゃ意味ないですよね。
どうしたらtest.cgiをsudoで動作させられるんでしょう？＞＜；

それはperlと関係ない話だからなぁ
sudoでググれば普通にわかるべ

つーか、そもそもmod_perl使わなきゃいいだけの話じゃないのか？
そんな何回も実行するようなもんじゃないし、危ない橋を渡ることもあるまいに

あ。解決しました。
visudoには
apache ALL=(root) NOPASSWD: /home/vpopmail/bin/vadduser
ですね。

教えてくださった方々ありがとうございました。

http://icomu.jp/96216/index.php

http://inoken.tv/?RF=1&frdref=130729

さげさげ

ほ

while(1){
print "Perl上級者コーナー";
$key = <STDIN>;
chop $kay;
print = "What's your name?\n;
print = "I'm $key*100 \n;
}

13歳が何もみないでかいてみた＞＜

13歳にしてはがんばったな

他の所の突っ込み処は置いといてchopってなんかおっさん臭がするんですが

mがないとおっさん？

チョンぷがあるのにchopは無ぇだろっていう’

chopも含めての釣りだろｊｋ。

敢えて釣られてやるのも大人の仕事だよ、ぼうやw

あげ

釣られてる割には偉そうな上にレベルが低いでつね
たかがwebごときで、っていうことはないんだけど
何かしらに依存したwebしかできないのに自称プログラマとか言ってる奴はshine
せめてwebとか接頭辞つけなさい
大概webプログラマって馬鹿ばっか

chopの方が早いし負荷もかからないもんなの
一般レベルの脳があれば推測できる問題
chompは$/とマッチという手順を踏むから

windowsなんて無視無視

スクリプターって基本的に馬鹿だから共用のレン鯖とかでいらぬリソース食うぐらいしか脳がないんじゃねーの？
その脳で素敵CGIスクリプトです！って糞コード延々と書きやがるから始末におえない

ところで上級者コーナーじゃないの？ここ
一年以上経ってるわけだけど>>466とかの頭って少しは修正されてるのだろうか

PerlをバカにするやつはC言語できないやつ

C++を勉強すればするほど「バカバカしい、Perlでやれたら」と思う俺はPerlをバカにしていることになるのか

>>470
おめえみたいなカスは一刻も早く死ぬべきだと思うよ
だいたいWebプログラマをバカにするのはまじで
Cオタなんだよ　な？お

おめえが書いた糞コードよりかも
そこらへんのクソウェブグラマ我書いたコードのほうが１００杯おもしれえんだよ
お願いだから早く死んでくれないかな？今すぐ？ね？お願いお前邪魔消えろ死ねよゴミハゲ失せろカス

リソースくってんじゃねえよおめえは資源の無駄
消えろてか死ねロボットの制御でもやってろよはなくそ消えて？
邪魔だから死ねばお目絵がばかだろ消えろ
お前みたいな目糞鼻糞はゴミなんだよウインドウズばかにしてんじゃねえよごみ

お前リアルだったらまじボコボコになってそうだね
てめえみたいな糞ガリチビがいきがってるとマジ死ねって思うよ

負けるな。『Perl忍者』

もっとガンバレ。

chopとchompの負荷比べる馬鹿がいるとは思わなかったわ。

速度の差なんてほとんどないのに行末改行なしのレコードを削ってしまうリスクを犯して
chop推奨するとかマジキチ。

速度ってわめけば上級者っぽくみえますからね
クソどもは

なんで半年前の話に首突っ込んだんだｗ

>>478
半年振りに来たからにきまってるじゃないか

warn AAA::BBB::
ってやったら、AAA::BBB って
表示されたんですが、これはバグですか仕様ですか？

>>480
仕様。パッケージ名とみなされパースされた。
Barewordは使わずクオートで囲うべし。

>>481
パッケージ名とみなされて、
パッケージ名の文字列となるのは
仕様なのですか

>>482
だろうね。
package Foo;
sub new {print "hola¥n"}
Foo::->new();
Foo->new();

あと、
warn AAA:BBB:
とかだとパースエラー出るからパッケージ名のパースが通ってるのは
多分間違いない。
眠いからソースは脳内

>>483
そうなんですかね。

どこにそんな仕様が書いてあるページがあるんだろう？
ネットでググっても見つからないし、
そもそも::でぐぐれないし。

404の人とか、これ見たら教えて

>>484
ダブルコロンを含んだ裸の文字列はパッケージ名以外認められていないので、
それをスカラ値として扱った場合どうなるかといった議論がそもそもあるかどうか
じゃないの？
ないのであれば仕様外のことをしてるので出力が不定になっても仕方ない、それが暗黙の仕様、
なんでそうなるかは>>481ってことでしょ。

はい４０４乙

こがいおつ

>>486
404ちゃうわｗ
404が見てるんなら添削して欲しいわ。

>>484

なにその Google脳、怖い...

初心者スレではレスが付かなかったので、こちらでお願いします。

日本語と英語以外に対応したければ
Encodeモジュールを使うしか無いのでしょうか？

NKFやJcodeは日本語専用ですよね？

みなさんは多言語対応にするとき何を使っていますか？

自分自身が多言語に対応していないのでそういう
アプリを書いたことがない、に一票。

>>490
答になっていないので無効票。

489 が考えている対象言語って何なの？
例えば、中国語だとか韓国語だとか...
それともいきなり全世界ってこと？

ただの興味本位なんだけど、どんなものを
作ろうとしてるのか知りたい

無効票になっちゃったけど興味はあるんだよね

>>492
> 489 が考えている対象言語って何なの？

たぶんPerl。



…すまん、言ってみたかっただけ。

まあ現実的な話としてUnicodeで扱うのが今は
いろんな意味で一番ラクなんでしょうね。
日本語と英語以外を扱わざるを得なくなったことがないし
他に解があるのかは知らないけど。

例えば中国語の場合、中国以外ならUTF-8でいいんだろうけど
当の中国はGB18030なわけで...
そういう例は他にもありそうな気がするしなぁ

Encodeってコード変換用のモジュールだから、UTF-8だけで
処理している分には特に何も使わなくても多言語対応に
なると思う。それよかメッセージを多言語に対応させて準備
するほうがよっぽど大変そうに思える。

ああ、WWW上の自動翻訳機能を呼び出すのか。

ブログとかで最初から最後まで（入力から保存から出力まで）すべて
Unicodeです。とかなら多言語対応も簡単なんだけど、
HTML解釈するプログラムとか、メーラーとか作ろうとすると
Unicode以外の文字コードを扱わないといけなくなるからね。
そうなると必然的にEncode使うことになる。

日本語にしか対応しません。っていうのならいいけどさ、
プログラマとしては諦めるのか？って感じだし、
今は世界から日本にサービス提供される時代でしょ。
そんなんじゃ黒船に対抗できないと思うんだよね。

なれないうちはEncodeモジュールは使いにくいかもしれないけど、
やるかやらないかを検討している時期じゃないと思うよ。
Jcodeとかはもう捨てたほうがいい。

Encodeモジュールが使いにくいのは同意。
モジュール内部のフラグをアプリケーションプログラマが面倒を
見ないとならない。

自分の作っている範囲では「日本語しか対応しません。」で
何も困らない。そもそもWWWアプリケーションを書くことが
あんまり(まったく)なくて、Perlで作るのはほとんどがローカル
環境で動作するテキストフィルタなんで。

だから日本語をちゃんと処理する必要があるけれど、他の言語
例えば韓国語などを処理する必要はまったくない。これからは
多言語の時代だよ、と言われても身の回りには需要がないし、
自分にそもそも外国語のスキルがない。

周りやある程度大雑把に広く見渡しても、バイリンガルだったり、
トリリンガル？のひとは本当に少数なので、多言語対応ソフト
ウェアを作ったり、テストしたりするのがそんなに容易なことなの
かと不思議に思う。

本やWebで薦められているほど、やれる人は多くいないんじゃ
ないかと思ってるけど、どうなんだろう？

>>496
そんなんだから、外国製なのに日本語にも対応している
ソフトやライブラリがどんどん広まるんだよ。

で、最終的に世界中の情報が利用できない。
圧倒的情報弱者になる。

っていうか、本当はEncodeがわからないんじゃなくて
UTF8フラグがわかんないんだよね？

UTF8フラグはPerlの機能だから
これがわからないとPerlがわかってないも同然だよ。

UTF8フラグがわかっていれば、Encodeは
実に素直な設計。

Perlから見れば文字コードは2つしかないよね

UTF8フラグなし → Latin-1
UTF8フラグあり → UTF8

>【UTF8フラグがわかっていれば、】Encodeは
>実に素直な設計。

その前提が怪しいと思ってる。というのは、

>Perlから見れば文字コードは2つしかないよね
>UTF8フラグなし → Latin-1
>UTF8フラグあり → UTF8

のどっちも使わないから。

身近なスクリプト書くのに Latin-1 や UTF-8 が
必要となるのだろうか？

利用者からしてみると後退しているように見えて
しまう。

おいらの理解では、
　　符号化方式(US-ASCII or Latin-1 or UTF-8)
と
　　utf8フラグの値(on or off)
と
　　内部コード or 外部コード
はすべて直交してて、全部で３×２×２＝１２の組合せが
あり得る(以下の表)

utf8flag internal
-----------------------------------
1. US-ASCII on yes
2. US-ASCII on no
3. US-ASCII off yes
4. US-ASCII off no
5. Latin-1 on yes
6. Latin-1 on no
7. Latin-1 off yes
8. Latin-1 off no
9. UTF-8 on yes
10. UTF-8 on no
11. UTF-8 off yes
12. UTF-8 off no
-----------------------------------

でも実際には発生しない組合せもあるため、状態の遷移が直交
しておらず、今、何になっているのか把握しづらい。

なぜかと言うと、プログラマが相手しているのは、書いている、
あるいは書かれている、静的なコードであるのに対して、上記は
プログラムの実行時に動的に変化するからだ。

これらの状態・動作を確認するという手間は、これまでになかっ
たわけだから、純粋に負担が増えてしまっている。

多言語に対応することに反対してないので、こういう負担が増え
ない方法で行えないものかと思う。

>>501
難しく考えすぎ。難しいと勘違いしているのなら、その原因はutf8（フラグ）という名称についてだけ

Perlには ”Perl文字列”（命名俺）と "バイナリ" の二つしか無い。（数値やオブジェクトはまあとりあえず忘れて）
"Perl文字列"は、その名の通りPerl言語専用の文字列。だからこの文字列をPerlの世界の外に存在しないし、外に出すことはない。
それはつまり、ネットワーク通信やファイル読み書きで外部に流してはいけないということを意味する。

"バイナリ"はただのバイトの並び。ネットワークやファイルから読み取るものは全部"バイナリ"（PerlIOという自動変換機能を使わない限り）
テキストファイルだろうがなんだろうが、それはPerlから見ればただのバイトの並びでしか無い。

Perlにおいて文字列を扱う関数や正規表現は すべて"Perl文字列"を引数に取る。
"バイナリ"も引数にとれるがそれは古いPerlとの互換性用の機能と考える。

じゃあその"Perl文字列"はどうやって作るかというとそれがEncodeモジュール。
ネットワークやファイルから与えられた"バイナリ"をEncodeモジュールを使って"Perl文字列"に変換する。

(utf8::*もあるが忘れていい。utf8.podにはことごとくEncodeモジュールを
使ってくださいと書いてある http://perldoc.jp/docs/perl/5.8.1/utf8.pod）

ちなみにソースコードに書いてある文字列。これもデフォルトでは "バイナリ" 。
互換性のことを考えると理由はわかると思う。use utf8;をするとソースコードの文字は"Perl文字列"になる。

文字コードはたくさんあるが、"Perl文字列"は一種類しかない。Encodeモジュールを使って
いろんな"バイナリ"を"Perl文字列"に変換できる。もちろんその逆も出来る。

US-ASCIIだろうが、Latin-1 だろうが、UTF-8だろうが、Shift-JISだろうが、EUC-JPだろうが
外部にあるものはみんな"バイナリ"。それをEncodeモジュールは"Perl文字列"に変換してくれる

"Perl文字列"の内部の実装がUTF8だとしても、そのことを意識する必要はない。
UTF8フラグという名前が良くないが、これはPerl文字列フラグと読み替えればいい。
Perl文字列フラグがついていればPerl文字列（繰り返すが中身がUTF8なのは知らなくていい）

http://perldoc.jp/docs/perl/5.10.0/perlunifaq.pod
> 内部表現は何か分からないエンコーディングで、常に明示的にエンコードと
> デコードが必要ということにしておいた方がよいです。


だからPerl文字列フラグ付きのUTF8やLatin-1などというものはない。
Perl文字列フラグがついていれば、それはすべて同じPerl文字列。


あとは自分のプログラムは文字列を扱うとき、"Perl文字列"を基本として使うのか（統一された文字のモダンなやり方）
"バイナリ"を基本として使うのか（互換性重視の古いやり方）を決める。"Perl文字列"なら文字と1文字として扱える。
"バイナリ"だとそうはいかない。

Perl文字列を基本として使うなら、Perl外部のネットワーク、ファイルの読み書き時にすぐに変換して
Perl文字列メインでコードを書くことになる。

もし古いモジュールがPerl文字列対応になっていなければ、バイナリに変換して呼び出すラッパーを書くことになるだろう。


反対にバイナリを基本として使うのなら、バイト数ではなく文字数を知りたい時など、
文字として扱いたいところでPerl文字列に変換して関数を呼び出す。
そういうラッパーを書くことになるだろう。


どちらを基本にするかをしっかりと自覚しているのなら、あとはラッパーが変換し、関数を呼び出し、ラッパーがもとに戻す。
ラッパーが違いを吸収して、Perl文字列だろうがバイナリだろうが、自分で決めた基本に統一できるのだから状態を確認する手間はない。

君が望んでいる通り、いろんな組み合わせや状態なんかを考えたくないだろう？
多言語対応で作るとなったとき、プログラムで使う文字はひとつに統一したほうがいいだろう？

それがPerlでは、"Perl文字列"になる。本当はPerl外も巻き込んで一つに統一されたほうが
いいんだけど、統一という言葉に一番近いUnicodeでさえ、文字集合は同じでも、文字を表すビット列には
UTF8、UTF16、UTF32などがある。近いうちに一つに統一されることは無いだろう。

だからPerl外部からPerl内部に渡って来る時の変換機能は絶対になくせない。
（もちろんこのアプリはこの文字コードだけを使いますと決めれば変換機能を
なくせはするだろうけど、それはPerlという言語の開発者が決めることではない）

古い互換性を保つコード・機能を忘れれば、Perl文字列はPerl文字列という物一つに統一されている。実にシンプル
逆にPerlの外ではいろんな文字コードが存在し変換の必要があるが、それはPerlのせいではない。

NKFやJcodeといったPerl文字列が存在しなかった時代に作られた「"バイナリ"を無理やり
文字列とみなして操作する」古いモジュールのことを忘れればこんなにシンプルなんだ。


長々と書いたが、結論はこれだけ。
Perl外部に存在する"バイナリ" と Perl内部に存在する"Perl文字列"
"バイナリ"を○○コードとみなして、"Perl文字列"に変換するのがEncodeモジュール

おまけ >>501の図の修正版

US-ASCII
Latin-1
UTF-8　　　　　　　いくつものエンコードがある
Shift-JIS　　　　　混沌とした世界
EUC-JP
その他

↑Perl外の世界の文字　(UTF-8フラグ 全部OFF)

----------------------Encodeモジュール等で変換

↓Perl内の世界の文字　(UTF-8フラグ ON)

Perl文字列　（ないしょだけど実装はUTF-8フラグ付きのUTF-8エンコード）

　　　　　　　　　　　たった一つのシンプルな世界


　Encodeモジュールで変換しなかった文字はどうなるかって？
　それは文字ではない。ただのバイナリ、バイトの配列だ。

”Perl文字列”の正式名称は、テキスト文字列(文字の文字列)　Text strings (character strings)
公式ドキュメントでは、Unicode文字列という名称は削除されている。

perlunitut - perldoc.perl.org
http://perldoc.perl.org/perlunitut.html#Definitions

perlunitut - Perl における Unicode のチュートリアル 【perldoc.jp】
http://perldoc.jp/docs/perl/5.10.0/perlunitut.pod#Text32strings32character32strings41

丁寧なレス、乙。

内容にはあんまり同意できないけど、とりあえず全部バイナリ
で処理して、それで困ったら文字列で処理することにする。
(そしてあんまり困らなそうな予感がする)

"Perl文字列フラグ" が「このデータは文字列だ」ということを
表わしているときと表わしていないときとがありそうに思える
ので自分が理解するまでは手が出せない。

他の言語、例えばC言語やVBだとかにも文字列フラグってあるん
かな？多言語処理をするにあたって不可欠なものなのかな？

C言語には文字列はない。すべてがバイナリ。C++には文字列型がたくさんある。
VB6は文字列はString型に入れるものでバイナリはbyte型配列に入れるもの。
Javaにもstringがある。VB.NETはしらん。

変数に型がある言語では、文字列型に入れた時点で文字列として扱われる。
その時にフラグやらなんやらいろんな情報が追加されるだろうが、それは気にすることじゃない。
そういう意味でPerよりも厳格に文字列とそうでないものが型として区別されている。

> 多言語処理をするにあたって不可欠なものなのかな？
不可欠。なぜなら「一文字」を認識できないことには、文字列処理はできない。

どうしても文字型というものが必要。それが型あり言語では型そのものであり、
型なし言語では、変数に入っている物にフラグをつけるしかない。
変数にバイナリデータだけ入っていては、バイナリと文字の区別はつかないからね。
だから少なくともこの2つを区別するためのフラグは必要になる。

それは処理系の実装者にとって、という意味なら同意だけど、
アプリを書く利用者にとって、ということなら同意できないな。

古今東西、これまでのコンピュータ言語で文字列フラグが
必要だったことがない。Unicodeだから必要になったと主張する
のなら、何かを間違えていると直感する。

> これまでのコンピュータ言語で文字列フラグが
> 必要だったことがない。

それは他の言語に文字列フラグに相当するものがあっただけの話。
多くの静的型付け言語では、文字列型というものがあった。そしてその文字列型は○○コードと
決まっており、文字列型の○○コードと、外部から渡される文字コードが違えばそのコードに変換して扱う。
それが文字列フラグを付けることに相当するものだ。
文字列フラグを付けるのは、データの文字列型へのキャストとも言えるな。
フラグというものを意識しすぎ。文字列型がバイナリ型かこの2つを意識すればいい。

言語側で文字列型は○○コードと決まってない言語では、プログラマが、
今、変数に入っているのは、何コードかを意識しないといけない面倒な言語になってる。
そういう言語はたとえ文字型と名乗っていても実質1バイト固定のバイナリ型であり
ほんとうの意味での文字列型ではない。Ｃ言語がそう。そしてその一つが昔のPerl。

今は、Perlは簡単になった。それは文字列型というものができたため。
動的型付け言語では変数に型がないから、データの方に型情報をもたせるしか無い。
それは文字列として扱いたければ、バイナリから文字列に変換する関数が必要になるということ。

これまでのコンピュータ言語を含め、”プログラマが文字コードを意識したくないのであれば”、
言語側で標準文字コードを決め、それに変換する処理が必要になり、そして実際にあるんだよ。
Unicodeだから必要になったのではない。文字の扱いを簡単にする → 文字列型が必要 → 変換処理が必要。

今のPerlのように文字型は○○コードと決まっている言語では、文字列として扱うとき
Javaなども含めて読み込み時に○○コードに変換してるよ。

重要な所を繰り返すね。Javaと同様、今のPerlは文字コードが決まってるよ。だから変換が必要だよ。

> のなら、何かを間違えていると直感する。
お前のプログラマ直感能力の限界だよそれはｗ

それは個人の脳内のモデルゆえ、あまり賛同を得られない

>>512
うわｗ　それはお前個人の感想だろ。
なんで賛同とか言っちゃってるの？ｗ

周りはみんな賛同を得ている。だから反論はない。
お前一人が、わかってないだけｗ

横レス

こんな超絶過疎スレで
>周りはみんな賛同を得ている。だから反論はない。
は、ねーだろw

自分定義の用語が出た瞬間から、数少ない住人は、
生暖かい目で見てるだけだ。

過疎スレなのに見てるとかｗ

「見てるなら、反論はしてない」の間違いだろｗ

エンタープライズ環境だったら、ソースを長くメンテしなきゃ
ならないし、世間のはやり・廃りの影響を受けたくない気持は
分かる。

ついこの間まで、モダンPerlはutf8フラグといっていたものが
これからは文字列フラグの時代！utf8フラグはもう消した。
となってはついていけなくなってしまう。

日本はガラパゴスなので代々、ソースがつぎ足しつぎ足し
でいい味が出ている場合もあると思う。

結局、はやり・廃りを糧とするのか、組み上がってるシス
テムを大黒柱としているかの違いなんだと思う。

大黒柱組に流行を押し付けようとしてもうまくいかないと
思うんだ。

"文字列フラグ" 約 2,560 件 （0.15 秒）
"文字列フラグ" perl 約 114 件 （0.07 秒）

>>516
文字列フラグって、UTF8フラグが紛らわしいから
言い換えて説明したほうがわかりやすいってことで
このスレの中でとりあえずそう呼んでただけだろ。
一般的にはUTF8フラグだ。

勝手に言い換えるのが、混乱を招いた良い例だな
本人はそれで説明した気分になってるんだろうけど

>>519
例えを使った説明ってそんなもんだろ・・・
勝手にじゃなくて、ちゃんと断ってたし、
お前、何が気にくわないんだ？

utf8フラグで十分意味が通じる上
文字列フラグという一般的でない言い換えによって何かが分かりやすくなることもない
utf8フラグ→文字列フラグ
はそもそも「たとえ」にもなんにもなってない

元々は、"UTF8フラグ"を"Perl文字列フラグ"と言い換えたんだろ？
それと"文字列フラグ"とが、同一のものか別のものか、本人以外
分らんし

途中からレス読んだら超絶意味不明。

だから何が気に食わないの？

言い換えても別になんの問題もないでしょ。
utf8フラグがわかりにくいと言っている人にとって
Perl文字列フラグはわかりやすい例えだったよ。

君はutf8フラグでわかるんだから、utf8フラグでもわかるという君の意見は
utf8フラグで混乱している人にとっては、なんの参考にもならないってわかるよね？

> 途中からレス読んだら超絶意味不明。

じゃあ、最初からレスよんでください・・・

>>504から今ままで20レスもないし。

反対意見を書き込んだのが一人しかいないと
思い込めるなんて幸せな人だな

>Perl文字列フラグはわかりやすい例えだったよ。
自画自賛？w

>>523
“utf8フラグ”で混乱している人は、
まず“utf8フラグ”で混乱しないよう知識を整理することが肝要。
ローカルルールの勝手な言い換えで済ましていては先には進めません。

>>525
自画自賛じゃないよ。

お前の方こそ、意見を書き込んでるのが
一人だと思っているように見えるが？

何で他の人が書いた文章に、そこまで熱くなれるんですか？

喩え話をするのが
気に食わなかったからでは？

ああ、そっちを想定して書いたのでは無いです。

>>530
？

527氏に対してレスったのであって、
他の人に対してレスったのでは無いって事だろ

どうでもいいよ。粘着。

>>533

utf8フラグが、その変数に格納されている内容が
UTF8であるかどうかを表わしていないように思え、

言い直したPerl文字列フラグが、これまたその変数
に格納されているものが本当に文字列なのかどうか
表わしていないように思える。

例えばこれからフラグを立てようとしている変数、
（あ〜、今立てようと思ってたのにぃ〜）
という(人間にとって)文字列を格納してある変数
は、格納してある内容とフラグが(まだ)一致して
いない。

UNIX は出来てから40年も経つんだけど、

・文字列はバイト列、かつ
・バイト列は文字列(として扱える)
・全てはファイル、なので
・システム的にテキストファイルとバイナリファイルを区別せず扱える

というところが新しいアイディアなのだと思う。
（もちろん他にも長所はあるけど）

UNIX 以前のオペレーティングシステムは、大抵
文字列とバイナリデータを区別して扱わないといけ
ない。

だから○○○フラグというものは、その頃のシステム
に逆戻りしているようで、使うおじさんとしては辛い。

文字列をバイト列として扱った場合に、
何文字か？っていう質問にどうやって答えればいいんだ？

それに一文字づつ処理をする場合
バイト列では処理できんだろ。


UNIXは、成り立っているように見えるが、
ASCIIコードだけしか考慮してないだけで
ASCII以外の文字を扱おうと考えたら、ボロボロだよ。

UNIXって1968年にできたんだけど、
それ以前のオペレーティングシステムって
一体どれの話をしてるんだ？

ちなみにC言語ができたのは1972年な。

まあ、Perl的な解決方法を考えるなら、シジルで
文字列なのかバイナリなのかを分ける方法もあるねw

Unicodeなら使える文字も増えるからASCIIの記号を
使い切ったからって困ることはないw

上の方で出ていた、
プログラマが相手しているのは静的なコード
とも合致するし。

全角の場合はバイト数を２で割ると文字数になる
半角の場合はバイト数が文字数

（だって先輩がそういってたもん）

UNIXがASCIIコードしか扱えないってのは
UTF8にもつながっていてね。

それは、UNIX（C言語）がASCII、つまり1バイト文字で
ある前提のライブラリばかりだから1文字が2バイト以上だと
文字列を引数に取る関数が使いものにならないんだよね。

具体的にはUTF16でABCの文字コードは00 41 00 42 00 43 になる。（今はエンディアンキニシナイ）
文字列の途中に\0がくるから、そこで文字が終了してしまう。

だからUNIX（Linux）系ではUTF8以外のUnicode符号化方式の採用が極めて困難になってる。
UNIXは昔も今も文字というより、1バイト単位で処理してるにすぎないんだよ。

>>538
ジジルねぇ。 $strの代わりに頭ではなく、
後ろにつけてstr$としたらどうだ？

詳しい人なら、これは昔のBASICで用いられていた
文字列型を表す記号に見えるだろう。ちなみに整数型は%

結局、あんたが言ってるのは型作れって話になってるよ。

Perlにおいてジジルは値の型ではなく値の構造、
つまり配列であるとか、ハッシュであるとか、
そういうことを区別するために使うもんだ。

まあ、Perl文化にはそわないだろうが、文字列型でも
問題が解決するというのは、先に書いてあるとおりで
実際コンパイラ言語ではそのようにして解決している。

>>539
EUCでさえ、3バイト日本語文字があるから気をつけて！

>>537

それは初恋のひとの名を世界に向けて公表するのと
同じことなので、おじさんとしてはほっぺたが真っ赤
になってしまう。

もしどうしてもというのなら言うけど。

じゃあお前の年齢だけ言ってくれればいいよｗ

昔のラリーなら、ダブルクォーテーションマークを
シジルに選びそうだなw

文字列シジルの議論、具体的にはよくわからないので教えてほしいのですが、
シジルでutf8フラグを可視化するということでしょうか？

例えばそのシジルを ! とした場合、

$binary1 = "あいう"; # 単なるバイナリ
$binary2 = !string; # utf8バイナリとして代入？

!string1 = "あいう"; # utf8フラグ付き文字
!string2 = decode("euc-jp", $binary);
!string3 = $binary; # utf8フラグを立てて代入？

ん?
PerlのUTF8フラグってのはデータの側じゃなくて処理系内部に持ってるんじゃないの?
なんかutf8フラグを「データの側」が持ってるようなことを書いてる人が
いるようにも読めるんだけど…。

>>541
ジジル じゃなくて シジル (sigil) ね。爺汁はイヤン。

>>547
Devel::Peekを使って、データの状態を見てみればわかるように、
UTF8フラグはデータ側に持っている状態のこと。
http://blog.livedoor.jp/xaicron/tag/Devel::Peek

おじさん、だんだんわからなくなってきたぞ？

処理系がデータに付加するモンでしょって話じゃね？

>>548
なるほどDevel::Peekね。あとで試してみる。
Perlのデータの保持の仕方ってこんなだったのね。勉強にナッタワ。

>>549
ようするに文字列というデータの状態を表すデータ、つまりメタデータだよ。

処理系内部ってのは、use utf8のことを言ってるんじゃないか？

use utf8というのは、ソースコードに書かれた文字、
その文字を変数に代入したときにutf8を立てるかどうかの話。

my $str = 'あいうえお';

ってコードがあったとき、$strにutf8を立てるかどうかの制御。
これはあくまでソースコードの話であって
ソースコード外から読み込んだデータには関係ない。

ASCII文字列をdecodeしてもutf8フラグが立たない仕様なのはどうして
だろう？ASCIIはUTF-8なわけだから例外としないで立ってくれればいい
のに。それにASCIIはもちろん文字列なわけで、文字列フラグがこれ
また機能と名称が一致しないのはなぜなんだろう？

>>553
ActivePerl5.8.9では、UTF8フラグが立つけど、>>553の環境は何ですか？

use Encode;

my $s = decode ascii => "a";
print utf8::is_utf8($s) ? "UTF8" : "Latin-1";

どうでもいいけど、こっちのほうが読みやすい。
my $s = decode("ascii", "a");

個人的には展開されるものが含まれないならシングルクオーテーションで囲むようにしたい

こんなスレあったのね。>>489あたりから読んだ。

UTF8フラグって、要するにCや他の言語で言うところのワイド文字列(wchar_t)だろ。
お前ら難しく考えすぎ。
対応表を作っておいたよ。

Perl ↔ C
UTF8フラグ付き文字列 ↔ wchar_t * (ワイド文字列)
UTF8フラグなし文字列 ↔ char * (マルチバイト文字列)
decode() ↔ mbstowcs(3)
encode() ↔ wcstombs(3)

Cならマルチバイト文字列を扱っているのか、ワイト文字列を扱っているのか
変数の型を見れば一目瞭然だが、Perlではどっちもスカラ変数に入っていて
データの方に型がついているので、慣れていないと混乱しやすいってことだろうね。
あと、「UTF8フラグ」って名前は最悪だな。素直にワイド文字列って言えばいいのにね。

そういや今ググったらEncode::Localeなんてモジュールもあるし、
Cで正しくI18Nなコードが組めるなら、Perl 5.8でもそのまま同じ考え方で
いけるようになってる、ってことだろう。
まだ混乱してるやつは、他の言語で勉強してから戻ってきた方がすんなり理解できるかもね。

要するにもクソも Perl はワイドキャラクターって言ってますがな

またばかがきたか

>>557
バカすぎｗ

UTF8フラグというのは、変数に追加された属性だ。
C言語のような型がある言語と一緒にしてはいけない。

変数に型がない言語では、型による判別が不可能だから
フラグを付けないといけない。

数値と文字までは、"123"と123を同一視することで
対応できた、文字列とバイナリ列は、文字を8bitで解釈することで
同じように扱えた。

しかしな、Unicode文字列とバイナリ列は型がないから区別ができないんだよ。
だから追加属性としてUTF8フラグを作ることになった。

型が無い言語でマルチバイト文字列をちゃんと扱おうとしたら
似たような仕組みが必要になる。

型があったらそんなこと考えずに済むのにね。

それは逆に
UTF8フラグがあれば型のことを考えずに済む
という話でもあるな

>>560,561
そうとは限らないでしょ、何か見落としてない？

>>557
UTF8フラグ付き文字列は実装としては単なるchar *型であり
本当にフラグで見分けてるだけだよ。何が最悪のネーミングだよアホか。

>>557 が不憫で仕方ない

>しかしな、Unicode文字列とバイナリ列は型がないから区別ができないんだよ。
区別しなくていいよ。latin1だって区別しないだろ。

UTF8フラグはバイナリ列と文字列を区別するためのもの、と言われている
がそれは間違いで、正しくはUTF-8とLatin-1の区別をするためのもの。
どちらもASCIIをもとに拡張されていて、その拡張部分を区別するため
にUTF8フラグが生まれた。2つの符号化方式を同時にサポートしようとした
結果の産物。

そもそも、文字列型という
型が存在しないから
フラグで区別するしか無い。
型なし言語の宿命。

>>566
いつからchar *がLatin-1になったんだ？
お前らEncode.pmが出来る前は普通にEUC-JPとかのバイナリ列をスカラに
当たり前のように突っ込んでただろ。ん？

> お前らEncode.pmが出来る前は普通にEUC-JPとかのバイナリ列をスカラに
> 当たり前のように突っ込んでただろ。ん？

面倒くさい時代だったよ。簡単なところでは文字列の長さを調べるのに
Perl非標準の関数を使わないといけないし、正規表現でも正しくマッチさせるために
工夫が必要になる。

さらに日本語以外はどうすんの？ 今はUTF8が事実上の標準だよね。
ってときに対応できない方法。

つまり以前は人間が、別々に用意されているバイナリ用関数と文字列用関数を
使い分けていたんだよ。

今は文字を扱うのに、Perlの標準関数がそのまま使えるようになった。

寝言ですね？わかります。

>>569
言うまでもないような言い訳はいいからトンデモ発言にゴメンナサイしろよ
バカがどんどんバレていくな。

ようするにUTF8フラグによってユーザが不必要な苦労をするようになったっ
てことか。とんでもなくばかな話だ。ゴメンナサイものだな。




ゴメンナサイ

Perl非標準ライブラリを使うことは
不必要な苦労だと思わないんだなｗ

これだからゆとりは。

使いにくい標準よりも使いやすい非標準。パソコンは買ったままの状態では
使わない。

>>572
UTF8フラグが不必要な苦労とか言うなら単に文字コード問題について
何も分かってないと言われても仕方ないな。

そうだね、標準装備でせいぜいがんばりな
買ったままのパソコンにはパールすら入っていないけどねｗ

カタカナｗ

>>576
今Perl入れたら、最新版が入ってしまう。
これだと、UTF8フラグに対応していないなどと言えない！

友人の話では次期Windows8にはP#（ピーシャープ）という言語が付属する
らしい。パールとは違ってCP932でのプログラミングが楽になるそうだ。
待ち遠しい。ただしホームエディションには付属しないらしい。

騙されやすい人っているよねｗ

いいなあ、その脳内友達ｗ

>>579
Perl::EncodeにCP932がないって初めて聞いたんだけど。

そんなこと言ってないぞｗ

まあEncode使わなくてもほとんどの処理はそのままいけるけどね
予想外の文字列が来たら面倒だから一応やっとくだけって感じで

ただ、今はその手間すらかからない言語あるからね。Rubyとか
文字列処理で後塵を拝するPerlを見るのはちょっと寂しい感じ

>>584
移植性とか再利用を考えるとEncode対応にしとくけどね。
ワンライナーでEncode使うほど律儀ではないけど。

Rubyと違ってPerlはガイジン作で我らがダンコガイ様が無理くり実装したのが
Encodeなんだから仕方ない。最近のバージョンがどうなってるのかぶっちゃけ
知らないけど。

>>579
Windowsはオレオレ実装のCP932を普及させたいだけだろ。
Macと違って全部UTF-8にする度胸のなさが丸見え。
まあUTF-8-MACの面倒臭さも大概にしろと思うが。

WindowsはNTの時代からUnicode（UTF16）だよ。
CP932はあくまで日本語版において
Unicodeに対応していないアプリ用
つか、海外版もあるのに日本語文字コード専用なわけないじゃんｗ

で、騙されやすい人っているよねｗ

日本語版の話だけで十分。

「全部」って書いてあるじゃん。釣だろうけどさ。

Latin-1もUTF-8も使わないってときにその区別をするための
フラグに気を使わないといけないなんて、ゆとりの俺には
まず不可能。

> Latin-1もUTF-8も使わない

そんなんで、多言語対応できるの？

>>590
その場合はフラグは別持ちだな。

$str_utf8 ・・・ utf8を格納する場合は変数名の後ろにutf8と付けること。

同様に、$str_euc、$str_sjisなどがある。

変数名をフラグとして利用するわけか...これはいいアイディアだな。
ハングリアン記法か。

>>591
符号化方式を変えただけで多言語に対応できると考えてるのなら
シフトJISでも十分多言語に対応できるんじゃないの？
多言語対応っていうのはそんなに甘くないと思うんだけどね

>>593
レガシーだなお前。読み込む時に文字コード指定するのがデフォだろ
>>595
お前日本文字がJIS X 0208に収まるとでも思ってんの？おめでてーな。
つかもうShift_JISやCP932のヤケクソ仕様に振り回されるのはゴメンだよ。
MSとMacのせいでUnicodeもメンドクサイことになってるけど

多言語と収める話を分けて考えたいね。収める話には所詮終わりがないからね。

そう考えるとCP932が一番使い勝手がいいな。残念ながらユニコードは頑張って
も無理。頑張りすぎて仕様が複雑になって、使いにくくなるという悪循環の罠。

>>589
最近の若者言葉の「全部」は俺たちの時代の「全部」の意味と違うらしい
ことに今気が付いたYo!!!
言葉は変化するわけだし誰が悪いということもない。しょうがない。

CP932が一番とかWindows屋なのが一発で分かるな。

ascii 最強伝説

EUCができる前はUNIXもシフトJISだったんよ。CP932だとそのシフトJISも扱えるんで便利。もちろんWindowsでも
便利。

そういや古いHP-UXのデフォルト日本語コードはShift JISだったっけ。(8とか9の頃)

>>602
他に日本語の標準的な文字規格がなかったからな。
NetNewsとかSMTPはShift_JIS通らなかったからローマ字かISO-2022-JPでやり
とりするしかなかった。
半角カナ保護のための迂回仕様がメンドクサすぎるのと、（それでいわゆる
ダメ文字問題が発生）ISO-2022-JPに半角カナが存在しないなどの理由で
この頃からUNIX界隈でShift_JISが嫌われ始める。

半角カナ資産を守るためには当初から現在に至るまでシフトJISしかない。
他の符号化方式が代わりに使えるかというとそうはいかない。

UNICODEに半角カナは含まれてる。

なにか言いたいことがあるならどうぞｗ

代わりに使えるかというとそうはいかない。

理由：「UNICODEに半角カナは含まれてる。」というのが嘘だから。

>>608が嘘だから

この世の全ての存在が嘘だから

半角の定義も分からんやつがいるのかこれもゆとりの弊害か大丈夫かそれでパールプログラミングできるのかそうか自称ならできるのか

半角の定義はどうでもよくて、

「半角カナ」と同じ文字が表示されるのであれば、
それは同じ文字です。

>>605
EUC-JPにもあるけど。UnicodeのHalfWidth Katakanaも半角カナと考えて
差し支えないし、実際にほとんどの処理系で同じ文字として運用されている。

結論：自称・パールができます(ｷﾘｯ

定義がどうでもいいとかいうPerl上級者コーナーｗ

半角の定義はどうでもいいだろｗ

誰が定義全部がどうでもいいっていったよ？

半角の定義がどうでもいいとかいうPerl上級者コーナーｗｗ

じゃあ、重要さをアピールしてください。

半角

・フォント派
漢字や平仮名の半分の幅でないと許せない

・バイト派
漢字は2バイト、半角カナは１バイトにすると文字幅とバイト数が
合致するので気持ちいい

・よく分かってない派
幅が狭い文字がないと絵文字とか書けなくなって困る。

むしろ同じ文字かどうか612以外、誰も何も言っていないんだけどな

システム的な定義よりもフィーリングの方が大事。ラリーもそう言い出して
らくだ本に長いことブランクが生じたんですね？さっき分かりました。

・よく分かってない派
　絵文字は絵文字、幅が狭い文字は幅が狭い文字で別物。
　ほんとはアスキーアートと言いたかった。
　（よく分かっていないので間違えました。すんまそん）

>>622
顔文字の間違いだ。許せ。

？

プログラミングの話をしているつもりだからコードポイントのことだと
考えているわけだけど、そうするとバイト派ってことかな。

同じ文字かどうかを話してるんじゃなくて、代わりに使えるかどうかを
話してるわけだから、バイト派として代わりに使えないという結論。

　　∧＿∧
　 （　・∀・） 　　 　 |　| ｶﾞｶﾞｯ
　と　　　　） 　　 　 |　|
　　 Ｙ　/ノ 　　　　 .人
　　　 /　） .人　　 < 　>_∧∩
　 ＿/し'　< 　>_∧∩｀Д´）/
　（＿フ彡　Ｖ｀Д´）/　　 / ←>>303
　　　　　　　　 　 　/ ←>>204

http://jobinjapan.jp/job-listing/keyword-perl-pg.html

perl で特定のwebページにアクセスしてそのページのスクリーンショットを撮って保存する、といったことは
実現できるでしょうか？プログラムを組む上で参考となるページなどありますか？

>>629
ウザい
消えろや池沼