速いです｡ 強制インスコアドオンをかませば拡張関係も解決ですし｡ keyconfigだけはうまくいか無い｡ ネットで調べてxpi解いてごにょごにょしたけどだめ｡ クロールしてたら Page not found · GitHub Pages を発見｡完璧です｡ ともかく､速い｡速いよ! 拡張含めて…

脳みそが回らん。疲れてるのか? print <<EOT; 循環配列 5要素の配列 画面に出力する?番目と 実際の要素ポイントが違うから 混乱しますた。 初歩。才能ないです。 知ってる。 EOT my @a = (1,2,3,4,5); print @a,"\n"; while(1){ chomp(my $a = <>); print $a,"番目にアクセス=> "; print $a[($a-1) % ($#a+1)],"\n"; #1,2,3,4,5,6,7,8,9, $a #0,1,2,3,4,5,6,7,8, $a-1 #5,5,5,5,5,5,5,5,5, $#ar+1 #0,1,2,…</eot;>

もう一回Rubyにスウィッチしてみる やっぱPerlより楽。なんか楽。 twitterあたりがスケールもOKの証明とかしてくれたら なんでもRORダ!っていえるのですけど。 イデオロギティックには。 なんかtwitterはrubyがボトルネックではもはや無いデスな 公式コメも…

12分20秒ぐらいから 著作権とか お金の事情とかホルダー達の 本音っぽい何か っていうかプロの人が「ニコニコ動画」って言葉を話すのが ちょっと刺激的

着ぐるみパジャマ

いや、分かるのだよ?使うのだよ?でも気持ち悪い、ニヤニヤしてしまう。 #リファレンスメモ #配列 #無名配列を格納(リファレンスの作成) my $arr = []; #無名配列にpush push @{$arr},(1,2,3); #参照値を出力 print $arr,"\t"; print \@{$arr},"\n";#\でリフ…

くだらないのは彼女の悩みではなくて こんなチラ裏を送信しようとしてしまったワタシ。 以下自重 こういうくその役にも立たない説教じみたことを言うのはいけません｡ 送らなくてよかった。ださいよ｡痛いなぁ｡こういうくだらない事を他人に言うようになったと…

グローバルスコープとブロックレベルのスコープを切り替えるとか 知りませんですた。 our $age =18;#myでもOK sub ageage{ my $age =23;#localでもOK return $age; } print &ageage;#=>23 print $age;#=>18 print <

「引っ越しするので冷蔵庫を返してください」 とメールにて連絡あり そうです。奴らから冷蔵庫を借りていました。 冷蔵庫の中身を片付けてしまわないと。 氷卵が出てきました。 冷蔵庫の他は。。。RATか。 冷蔵庫にRAT入れて返そう。 コレで100%切れるな い…

賢いね。。。 if(()=function()){.....}

Dimp―画面内の対象物をつかんで動かせるビデオプレイヤー | TechCrunch Japan に解説あり｡やばすぎると思う｡逆毛だった｡しかも自動で作れるし｡

ラリーおじさんが作ったらしい。怖いからちょっと確認する。 #! /usr/bin/perl use strict; use Fcntl; #evalの対象を読み込み格納 my $oparate = shift or die "引数の一個目をevalします、2つめの引数を@ARGVで読み対象リストにします"; #ログファイルの用…

要するにこういうこと chomp(my $path = `pwd`); opendir my $dirh,$path or die; 環境独自(winXP_cygwin_bash)なのかは知らんけどpwdの出力には改行らしきものが含まれていて chompしないと死なれます。 雨ですね。

エンドレスでまわってる 昭和!昭和!

こんなのできるのねぇ。。。 while(<main::DATA>){print} __END__ ここにいろいろ書いても 普通は処理されない 参照も出来たり出来なかったり</main::data>

id:kotorikotorikoさんあたりから始まった耳栓ライフ。 楽しい。もういっつも付けてる。いらない音を効かなくていいのは楽ですね。 危険かもしれませんが耳栓をして上から大きめのヘッドホンをして自転車に乗るのがおすすめ。 なんか現実感が無くなります。…

#! /usr/bin/perl -w use strict; use Carp; print <<EOT; プロトタイプもよくわからん。 少しはまった EOT #普通の定義 sub test{ print shift,"\t"; print shift,"\n"; } #定義 sub proto($$){ print shift,"\t"; print shift,"\n"; } #どうなの? #普通のに引数不足で投げてみる &test('proto');#=>shiftできねぇよ!と叱られる、意図通り #引数不足でプロトタイプ形式に投げてみる &proto('proto');#=>shif…</eot;>

大地監督なのでガチ しかもシリアスモード。 笑いはない｡ 気合いが入ってる。 戦争のむなしさみたいな、 人の世の悲しさよ的テーマです｡ 群像劇｡ このテーマはありふれてるから目立ちはしないだろうけど 演出が良い。 吐き気がするから演出が良い。 サラのあ…

なんか自分のやってることのレベルが低すぎて嫌になるけど諦めない｡ #! /usr/bin/perl -w use strict; use Carp; print <

Transport Layer Security - Wikipedia SSL/TLS 暗号化: はじめに - Apache HTTP サーバ TCPラッパー 公開鍵方式で暗号化して通信 サーバー､クライアント双方が提出する乱数により公開鍵を作成｡ サーバ証明書で(ちゃんとした証明書はCA証明書｡秘密鍵方式の電…

はてダのバックアップをタグで解析してDBに投げる途上で はまった｡ 正直さっぱりからん。日本語を含む正規表現を適用したいのだけれど。。 スクリプトはshiftjis､対象ファイルはunicode｡ push(@list,$str =~/日本語を含むパターン/sg); ってところを解決すれ…

@hakaigo = mapとか{ うにゅ~} @{[@array]}; @hakaigo = grepとか{うにゅうにゅー} eval {@array};

レイプされて妊娠とかもしちゃってたら 「死なせて!」 てな事になりがちだけれど どうすりゃいいんだろうねぇ? エゴ記法以外でどう対応すればいいのだろうねぇ。 実際どんな気持ちなのかはよくわからんしなぁ 「おろせばいいと思うよ」 「男は億単位でよく殺…

べんりかもなぁ。。 #こういうファイルを入れると =pod this is 1 and next this is 2 and next this is 3 and next this is 4 and next this is 5 and next this is 6 and next this is 7 and next this is end and next this is after 1 this is after 2 =…

さくらにさくらんぼがなっていました｡ 近所のおばさま方が群がっていたので混じって食しました｡ 酸っぱくて苦かったです｡ print <<EOT; ハッシュの値でソートする 名前 => 点数 とかのハッシュでベスト3を出すとか もっとイイ方法がある気がする EOT my %hash = ( 'aa' => 10, 'cc' => 20, 'bb' => </eot;>…

なかなかにさわやかではある ありがとうね！！『リラリラリラックスタイム♪』 元記事 | 7時間前 by makiizumi ○コ○コ動画の件、工夫ありがとうございます♪ 私達も、コメントを見せてもらって楽しんでます♪ただ、ごめんなさいなのですよ〜。前のも、今のも、…

活動終了とのこと｡ 合掌｡

やっとリファレンスにたどりついた リファレンスとCのポインタの部分を取っ替えひっかえ読んでたらなんかうれしくなった｡ #悶々。1919なら2828になるだろjk $woman = [1,9,1,9]; print @{$man} = map{($_ > 5) ? $_ - 1:$_ + 1 } @{$woman};

仕様な訳だがメールを送信するときに 連絡先登録氏名形式で宛先欄を書くとまんま送られるので 「びっちの夫でご愁傷様」てな名前で連絡先を登録しているとそのまま送られちゃう。Gmailなんかはインクリメンタルサーチ気持ちいいとか言いながらそのまま送るこ…

日本語だぁ perldocとか 404 Not Found - perldoc.jp rubyとか 404 Error - Not Found ああああ､有り難い with migemoでとてもよい googleAPI Google Maps API — Google Developers