01/09/11 15:59 .net
━(゚Д゚;)━
3:名無しさん@お腹いっぱい。
01/09/11 16:09 .net
━(゚Д゚;)━
4:初心者
01/09/11 16:11 9.SKwdns.net
>>2-3さん
そんなに驚かないでください。
5:名無しさん@お腹いっぱい。
01/09/11 16:26 .net
ちょっとワロタよ、一緒に勉強しよー♪
でも、初心者師ねな人にはウザイからサゲでこっそりヤローヨ(・∀・)
6:名無しさん@お腹いっぱい。
01/09/11 16:39 .net
----------------ネタスレ終了----------------
7:初心者
01/09/11 17:02 .net
>>5
はい、勉強します。たまには上げさせてくださいね
>>6
一つも質問に答えてないのに終了なんてイヤです
8:名無しさん@お腹いっぱい。
01/09/11 17:21 .net
そんなに質問に答えたいなら質問スレに投稿された質問に答えてればいいだろうが。
それでも物足りないなら他のBBSに投稿されている質問に答えてやれ。
そうすることがこの板の住民にとってもアンタにとっても困っている厨房にとっても最も幸いだ。
-完-
9:初心者
01/09/11 18:12 .net
逆ギレしてみます
オイこら、初心者だからってなめてんじゃねェよ
答えってやるって言ってんだ
ゴタゴタぬかす前に早く質問晒せよヴォゲ!
10:名無しさん@お腹いっぱい。
01/09/11 18:14 .net
cryptに使われている暗号化アルゴリズムの仕組みを教えてください
11:名無しさん@お腹いっぱい。
01/09/11 18:18 .net
hashテーブルはどう実装されてるんだよ
教えろや(´Д`)コルァ
12:
01/09/11 18:30 .net
オブジェクト指向に付いて簡単に教えて下さい。
13:名無しさん@お腹いっぱい。
01/09/11 18:32 liJMw8bE.net
みんないぢわるだなぁ…
14:名無しさん@お腹いっぱい。
01/09/11 18:38 .net
これがPerlhackerのネタでガリガリ答えてくれたら最高のネタスレなんだけどな W
15:初々しい人
01/09/11 18:41 .net
私のような初々しい人でも使える可逆暗号化ライブラリ作れ
16:名無しさん@お腹いっぱい。
01/09/11 18:46 .net
>>15
可逆暗号の基本として排他的論理和(xor)を使うのがあるけど
17:名無しさん@お腹いっぱい。
01/09/11 19:11 .net
XSを使ってみたいのですがよく分かりません。
教えてください。
18:初心者
01/09/11 19:42 9.SKwdns.net
>>10
libcryptの実装によって暗号化アルゴリズムは違うようです。
crypt(3)を呼び出してるだけのようですのでPerlとは直接関係ないです。
>>11
ソースを読んでくださいそれが実装です。
perldoc perlguts も参考になるかもしれません。
>>12
範囲が広すぎです。
Perlでオブジェクト指向を実装するには?ってことですか?
オブジェクト指向の概念ということだとスレ違いです。
>>15
すでにあるようです。
URLリンク(search.cpan.org)
ここでCrypt:: で始まるモジュールで好きなの選んでください。
使い方がわからなかったらまた聞いてください。
>>17
すみません。
Cはあまりやったこと無いのでxsについてはあまり知りません。
perl perlxs が参考になりそうです。
19:名無しさん@お腹いっぱい。
01/09/11 19:47 .net
初心者に対してperldocを読めとはなんて素晴らしい教え方だろう。
感動した!
------------------------------終了------------------------------
20:名無しさん@お腹いっぱい。
01/09/11 19:54 .net
taintを(パターンマッチで)取り除いたデータを
もう一度taintし直すことはできますか?
おしえて初心者さま
21:初心者
01/09/11 20:07 .net
>>20
$safe = 'test';
$tainted = `echo $safe`;
こんな感じでどうですか?
22:20
01/09/11 20:16 .net
>>21
おお、簡単なことだったんですね。
もしかして初心者さんって本物の
Perlハカー?
23:初心者
01/09/11 20:21 .net
taintを取り除く必要がないのなら、
use re 'taint'; も使えます。
マッチさせた値のtaintをそのまま維持するようです。
24:名無しさん@お腹いっぱい
01/09/11 20:27 .net
おもしろいぞ 頑張れ>初心者
25:20
01/09/11 20:41 .net
>>23
今日初めて
man re
してみました。勉強になります。
ただ、今回は一旦evalする必要がある
ので、taintは除去しなきゃいけませ
ん。
いずれにせよありがとうございます
>>初心者さま
26:初心者
01/09/12 19:06 y/zpkkrk.net
ひそやかなる怒りと悲しみを胸に。
質問してください。
27:お願いします
01/09/13 01:01 .net
perlで作ったcgiをwebで動かしたときにトランザクション制限はどの程度でしょうか?
例えばほぼ同時にperlが動いた場合などどの程度同時起動すると止まるんでしょうか
28:名無しさん@お腹いっぱい。
01/09/13 02:32 .net
>>27
Apache の MaxClients ディレクティブの設定によって、
CGI起動のプロセス数は制限されるでしょう。
その前に色々なシステムのlimit、
たとえばメモリやファイルのオープン数、に達すれば当然止まるでしょう。
いずれにせよ、環境次第です。
29:初心者
01/09/13 02:33 skA46.9M.net
すみません。28=初心者です。
30:_gunzip
01/09/13 06:51 .net
>例えばほぼ同時にperlが動いた場合
Configureの途中、libperl.soのダイナミックリンクを利用する
方を選択すると、実行モジュールのサイズが小さくなるし、
複数のperlインタプリタでイメージを共有できるので、
結果として,mmap()コールで実行ファイルをメモリににマッピング
する際のオーバヘッドの減少、ディスク/スワップ領域の利用効率の向上、
物理メモリの節約等のメリットがあるね。
(....デフォルトでは実行速度向上のために利用しないようになっているけど)
31:名無しさん@お腹いっぱい。
01/09/13 09:22 .net
ネタスレ臭かったのにがんばってるね。
32:_gunzip
01/09/13 15:51 .net
>>11
Perlのハッシュは分離連鎖法(separate chaining)で、ハッシュ値が衝突した場合リンクリストで繋いでいく方式。
詳しくはhv.cを読めば分かるよ。
#ちなみに、Perl5.7.2からはハッシュ関数が変更されています。
33:27
01/09/13 17:12 .net
>>28-30
ありがとうございます。詳しい初心者さんと_gunzipさん
若干調整できるものの環境次第と覚えておきます。難しいなぁ。
34:名無しさん@お腹いっぱい。
01/11/07 02:11 szSo57Rp.net
Win32::DDEに関するドキュメントはどこにあるのでしょうか。
できれば日本語がよいのですが。
スレ違いですが、DDEに関して教えてくれるスレ知りませんか?
35:初心者
02/01/07 23:41 uQai8xGp.net
久々にアゲてみたり
36:名無しさん@お腹いっぱい。
02/01/08 22:29 .net
いいぞ~初心者~~>(・∀・)
37:名無しさん@お腹いっぱい。
02/01/09 17:51 .net
evalを使っているcgiへの具体的な攻撃方法を教えて下さい。
また、どうしてもevalを使う必要があるときの、
攻撃回避方法も教えて下さい。
38:名無しさん@お腹いっぱい。
02/01/09 18:00 .net
evalがどう言うものかを先に僕に教えて下さい。
よろしくお願いします。
39:名無しさん@お腹いっぱい。
02/01/09 18:04 .net
えばる。
40:名無しさん@お腹いっぱい。
02/01/09 18:57 .net
Perlで電気ストーブを作るにはどういう記述が必要なのかね?
俺に教えてみたまえ。Perlという言語はそもそも電気ストーブの開発の為に
考案された言語なのだよ。つまりこの質問に答えられないようならPerlについて何も理解していないということだ。
41:名無しさん@お腹いっぱい。
02/01/09 18:58 bJedpWRu.net
パールについてお聞きしたいです。
メールアドレスをパラメータにしてCGIに渡したいのですが、
このメールアドレスを暗号化した状態(つまり見ても分からない)で
CGIに渡したいです。 それで渡した後、暗号を複合化して
メールアドレスを使いたいです。
CRYPT関数は複合化できないし・・・
どうしたらよいのでしょうか?
42:名無しさん@お腹いっぱい。
02/01/09 19:02 .net
>>41 複合化できるように暗号化する
43:親切な人
02/01/09 19:07 .net
ヤフーオークションで、幻の人気商品、発見!!!
今は無き「コピーガードキャンセラー」↓
URLリンク(page5.auctions.yahoo.co.jp)
ヤフーオークション内では、現在、このオークション
の話題で、持ちきりです。
44:名無しさん@お腹いっぱい。
02/01/09 19:07 bJedpWRu.net
<<41
あの・・具体的に教えていただけると
ありがたいのですが・・・
関数とかないのですか?
45:名無しさん@お腹いっぱい。
02/01/09 19:18 .net
>>44
URLリンク(search.cpan.org)
46:名無しさん@お腹いっぱい。
02/01/09 19:31 bJedpWRu.net
>>45
ありがとうございます
my $key = pack("H16", "0123456789ABCDEF");
my $cipher = new Crypt::DES $key;
my $ciphertext = $cipher->encrypt("plaintex"); # NB - 8 bytes
print unpack("H16", $ciphertext), "\n";
exampleにあったこれでしょうか?
これで0123456789ABCDEFの所にメールアドレスをいれて暗号
化するのですか?
47:初心者
02/01/10 14:45 h2cHbHUk.net
>>38
evalは引数をコードとして実行する関数です。
例えば、
$code = q{ $foo = 'bar'; };
eval $code;
だと$foo に'bar'が代入されます。
実行するコードを実行時に変化させたい場合によく使います。
ブロックを引数にするevalもあって
eval { $foo = 'bar'; }
はさっきのコードと同じことをしますが、実行するコードは変えられません。
何に使うのかと言うと、evalで実行時エラーをトラップできるので
例外処理によく使われます。
>>37
単純な例で例えば、CGIのクエリーをそのままevalに渡してしまう例、
use CGI;
$q = CGI->new();
eval $q->query('code');
とすると、攻撃者は任意のコードを実行できてしまいます。
回避方法としては汚染チェックをきちんとすることです。
それさえやっていれば、別にevalの使用を恐れることはないでしょう。
48:名無しさん@お腹いっぱい。
02/01/10 14:48 .net
>>47
おお!ありがとう初心者たん。
49:名無しさん@お腹いっぱい。
02/01/10 18:51 iKOVjCBf.net
>>46
plaintexの方ね。
50:名無しさん@お腹いっぱい。
02/01/10 20:48 .net
アップローダーがとても重いのですが軽くする方法はありませんか?
51:名無しさん@お腹いっぱい。
02/01/10 21:01 .net
>>50
.htaccessにこう記載する。
<Files *.cgi>
order deny,allow
deny from all
</Files>
52:名無しさん@お腹いっぱい。
02/01/10 21:03 .net
ハァ??
きしょっ!
53:眼鏡オタですが何か?プ)
02/01/10 23:42 .net
汚染チェックってなんですか?
54:
02/01/11 00:00 .net
>>50
痩せろ
55:名無しさん@NEmacs
02/01/11 01:49 fZtnJrfW.net
>>54
アスカ様ハァハァ。
>>53
URLリンク(www.google.co.jp)
56:初心者
02/02/01 23:49 GSMdD5I4.net
初心者パワーをなめちゃぁいかん。
57:名無しさん@お腹いっぱい。
02/02/02 11:07 .net
>>56
上げただけじゃない・・・w
58:名無しさん@お腹いっぱい。
02/02/03 11:44 .net
画像連結にfly使ったんですが、Unisysに特許料払わんとだめですか?
59:名無しさん@お腹いっぱい。
02/02/03 11:53 6O2qk++F.net
はい。私は毎月50万円払っています。
60:名無しさん@お腹いっぱい。
02/02/03 15:25 .net
なんで
”名無しさん@お腹いっぱい”
なんですか?
61:名無しさん@お腹いっぱい。
02/02/03 17:22 .net
>>60
「名無しさん」を変えてないからだよ。
62:名無しさん@お腹いっぱい。
02/02/04 03:23 sAx7lHcm.net
>1
perlってなんですか?
63:初心者
02/02/04 04:03 g/ay00Kk.net
>>62
Perlで書かれたスクリプトを実行するコマンドです。
64:名無しさん@お腹いっぱい。
02/02/04 09:42 t9Gb2AU1.net
my及びlocal関数での局所化の必要性について教えて下さい。
65:名無しさん@お腹いっぱい。
02/02/04 09:52 t9Gb2AU1.net
それとついでにここの1さんは少なくとも中級者以上の実力はあると思うのです。
まぎらわしいのでHNを中級者に変えません?
66:名無しさん@お腹いっぱい。
02/02/04 11:49 fnAmBNHz.net
こんにちわ、perlの事で質問させてください。
以下のスクリプトですが
#! /usr/bin/perl # お約束
# 私のスクリプトそのままです(編集はしてません)
$TMP = 10 ** 10; # $TMP に10の10乗を代入
$X = 10; # $X に10を代入
while ($TMP) # $TMPが0になるまで繰り返し処理
{$A = --$TMP % $X; # $TMPの値を-1し、$Xの剰余を$Aに代入
print "$A $TMP \n";}# 処置した値を画面に表示
上記のスクリプトですが、表示される$Aの値が変化しません
5 999999999
5 999999998
5 999999997 ......
$Xの値が1だと$Aは0で固定
$Xの値が2だと$Aは1で固定
$Xの値が3だと$Aは0で固定
$Xの値が4だと$Aは3で固定
$Xの値が5だと$Aは0で固定
$Xの値が6だと$Aは3で固定
$Xの値が7だと$Aは3で固定
$Xの値が8だと$Aは7で固定
$Xの値が9だと$Aは3で固定
私の知識が正しければ、$TMPの値を$Xで割った余りの数値が表示され
1行ごとに値が変更されると思うのですが。。。
どこか間違っているのでしょうか
識者の皆様、ご回答をお願いします
67:名無しさん@お腹いっぱい。
02/02/04 12:00 .net
>識者の皆様、ご回答をお願いします
「皆様」に聞きたいなら初心者スレに書け。
ここは>>1に聞く為のスレだ。
>1行ごとに値が変更されると思うのですが。。。
固定されないが。
68:初心者
02/02/04 13:31 g/ay00Kk.net
>>64
必要性と言われても・・というのが正直なところです。
何らかの必要性があるからmyやlocalが存在するのでしょう。
一般的にグローバル変数は少ない方がいいとされています。
ソースを他人に見せるときや、昔書いたソースを見直すとき、
グローバル変数が無い方が理解しやすいです。
>>65 初心忘るべからず。
>>66
Perlのバージョンはいくつでしょう?
URLリンク(www.perldoc.com)
の3項目、
Integer modulus on large unsigned integers
sometimes returned incorrect values.
と言うわけで、Perl5.6.0以降を使いましょう。
69:66
02/02/04 13:53 .net
>>68 :初心者様
ご回答ありがとうございました
確認してみたところ、確かに、バージョンが古すぎました
(5.005_03)
$TMPの値を10**10 から 10**9 に変更して実施してみたところ
正常に動作することを確認しました
ご回答、ありがとうございました
70:名無しさん@お腹いっぱい。
02/02/04 20:08 +YaLpde/.net
>>66
老婆心ながら
変数名を3文字に統一しないなら「TMP」は「TEMP」にした方が良いね。
あと、66のスクリプトなら「$A]と「$X]の変数名は逆にしようよ
一番良いのは
$TEMP => $I(カウント変数)
$A => $X(計算値変数)
$X => $A(定数)
細かいけど、癖にしてたほうが後で役に立つよ
71:名無しさん@お腹いっぱい。
02/02/04 20:11 .net
物凄く余計なお世話だ (笑
72:名無しさん@お腹いっぱい。
02/02/04 20:39 .net
正直
自分の知ってる範囲で決めた命名法ほど迷惑なものは無い
# 人に押し付ける事なかれ
73:名無しさん@お腹いっぱい。
02/02/04 20:40 nACYCDdm.net
しかし正論だ。(笑
74:名無しさん@お腹いっぱい。
02/02/04 23:04 .net
$iは少し同意。
暗黙の了解化してるな。
$i使うのがカッコイイとか思って使ってきたけどね。
75:名無しさん@お腹いっぱい。
02/02/04 23:18 .net
意外な落とし穴は$aと$b
こないだこれではまりそうになった。
76:名無しさん@お腹いっぱい。
02/02/04 23:21 .net
>>75
と、言うと?
$1みたいに何か意味のある変数?
77:名無しさん@お腹いっぱい。
02/02/04 23:30 .net
>>76 sort で使われるね。
78:名無しさん@お腹いっぱい。
02/02/04 23:33 .net
>>77
勉強になります。
sortってuniqの前準備に、
@list = sort(@list);
でしか使ったこと無いから知らなかったです。
sortも独自の書式使いますね。
sort{a <=> b}こんなん。
79:名無しさん@お腹いっぱい。
02/02/05 01:29 ucr4R94I.net
>>75
記憶違いだったら本当にごめん
sort文で使用される$a,$bは、完全にsort文だけの中で仮想変数で
外部の変数とは別扱いではなかったでしょうか?
初心者なんで激しいはツッコミは勘弁して下さい
80:79
02/02/05 01:30 .net
初心者以前に 日本語が変
81:名無しさん@お腹いっぱい。
02/02/05 02:06 .net
自分ツッコミを覚えた!
82:名無しさん@お腹いっぱい。
02/02/05 02:19 .net
>81
パパパパンパンパッパー
79はレベルがあがった!
83:615
02/02/05 02:55 .net
$a ってreadonlyじゃ無いから、間違えた時気付きにくいんだと思います
use strict;
$a = 100; #エラー出ない
これでModification of read-onlyが出ないと場合によっては嵌る事に
なるのかと
Perlはstrict+wスイッチが大前提だから、そんなに神経質になる程じゃ
ないと思いますが。
84:名無しさん@お腹いっぱい。
02/02/05 02:56 .net
何かクッキー残りまくってる (鬱
615は無視してくだされ。。
85:617 (←違う)
02/02/06 18:40 hdNADrgP.net
system関数を使用せずに
特定のLAN接続端末のIPアドレスを指定して
そのMACアドレスを知る方法が知りたい、教えれ
これは避けたいです
system "traceroute $IP_ADDR";
@MAC_ADDR = `arp $IP_ADDR`;
86:名無しさん@お腹いっぱい。
02/02/06 20:04 .net
自分でarpと同じ事すれば良し
87:名無しさん@お腹いっぱい。
02/02/06 22:13 .net
arpって何層のプロトコルでしたっけ?
データリンク?IP使うからネットワーク?
socketは使えないからポート直接操作になるんでしょうか?
88:85
02/02/06 22:24 hksal3H7.net
>>87様
arpは、確か操作端末のスタックメモリーの内容を表示するだけの命令だったと思います
直前に、目的のマシンとTCP/IP通信をしないと情報が得られませんし・・。
89:名無しさん@お腹いっぱい。
02/02/06 22:31 .net
なるほど、TCP/IPで通信するにはMACアドレスを知っている必要がある。ならそのとき使った情報を見ればよいってことで良いでしょうか。
親切にありがとうございました。勉強し直してきます。
90:@@@@@@@
02/04/21 09:12 .net
@@@@@@@@@@@@@@
91:nobodyさん
02/11/28 08:20 ArDOlCQW.net
こんなスレもありましたね。
92:nobodyさん
02/11/28 08:27 .net
>>91
アフォか。>>1がいないのに上げてどうすんだよ。
93:初心者
02/12/09 01:21 vZ/rPhuU.net
復帰してもいいですか? 質問してください。
94:山崎渉
03/01/15 13:42 .net
(^^)
95:Name_Not_Found
03/02/17 18:28 Kv+xH8ZL.net
ほとんどのperlスレは山崎渉のレスが最期で終わってるな。
96:山崎渉
03/03/13 17:14 .net
(^^)
97:山崎渉
03/04/17 12:24 .net
(^^)
98:山崎渉
03/04/20 06:09 .net
∧_∧
( ^^ )< ぬるぽ(^^)
99:山崎渉
03/05/22 02:12 .net
━―━―━―━―━―━―━―━―━[JR山崎駅(^^)]━―━―━―━―━―━―━―━―━―
100:山崎渉
03/05/28 17:15 .net
∧_∧
ピュ.ー ( ^^ ) <これからも僕を応援して下さいね(^^)。
=〔~∪ ̄ ̄〕
= ◎―◎ 山崎渉
101:nobodyさん
03/07/09 05:25 .net
教えてください。
ActivePerl5.6.1.635とAnhttpdでプログラムを
試しているのですが<STDIN>をプログラムに入れると
固まってしまいます。Anhttpdでプログラムを試している
方はどういう風になさっているんでしょうか。
102:山崎 渉
03/07/15 11:19 .net
__∧_∧_
|( ^^ )| <寝るぽ(^^)
|\⌒⌒⌒\
\ |⌒⌒⌒~| 山崎渉
~ ̄ ̄ ̄ ̄
103:山崎 渉
03/08/02 02:33 .net
∧_∧
( ^^ )< ぬるぽ(^^)
104:ぼるじょあ
03/08/02 05:10 .net
∧_∧ ∧_∧
ピュ.ー ( ・3・) ( ^^ ) <これからも僕たちを応援して下さいね(^^)。
=〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
= ◎―――◎ 山崎渉&ぼるじょあ
105:nobodyさん
03/08/03 21:44 .net
>>101
#! C:/perl/bin/perl
print "Content-type: text/plain\n\n";
print "HELLO!\n";
print <STDIN>;
こんなんでも動くけど。
ActivePerl5.6.1 build631とAnhttpd1.42h
106:山崎 渉
03/08/15 23:11 .net
(⌒V⌒)
│ ^ ^ │<これからも僕を応援して下さいね(^^)。
⊂| |つ
(_)(_) 山崎パン
107:nobodyさん
03/09/17 10:16 .net
>>101
まさかとはおもうが
while(<STDIN>){ }
とかやってないよな?
108:('x')
04/05/07 23:03 .net
('x')
109:nobodyさん
06/06/26 23:02:43 .net
>>107
おまえな~。2ヶ月も前の投稿にレスすんじゃねーよ。
と言いつつ3年前の投稿にレスしてみる。
この板って圧縮されないのかね~。
110:nobodyさん
06/10/25 21:59:11 thTrAQ7o.net
ちょっと疑問に思ったんだが、MovableTypeとかPerlで書かれてるソフトあるけど、あれってソース公開しなくていいのかな?
絶対GPLのライブラリとか使ってると思うんだが…
111:nobodyさん
06/10/26 22:44:05 .net
MovableTypeって、ソースで公開されてない部分あるっけ?
112:nobodyさん
06/10/29 21:26:37 .net
無いよ。>>110は何か勘違いしてる。
113:nobodyさん
10/04/24 14:20:54 .net
MovableTypeはPerlで書かれていてソースは公開されている。
>>110
>絶対GPLのライブラリとか使ってると思う
思うのは自由ですが、どの部分なのかをソースを見て教えて
欲しい。
付き合うからさ。
で、だとしたら何なの?
114:nobodyさん
11/09/02 13:00:58.84 .net
>>103
ガッ
115:
12/03/10 21:29:55.90 .net BE:40541322-PLT(12078)
∧_∧
( ・∀・) | | ガッ
と ) | |
Y /ノ 人
/ ) < >__Λ∩
_/し' //. V`Д´)/ ←>>98
(_フ彡 /
116:nobodyさん
13/10/29 22:01:21.71 z4zTbkHZ.net
解散。
117:nobodyさん
14/07/30 08:39:37.16 pqeNITpP.net
★2ch勢いランキングサイトリスト★
◎ +ニュース
・ 2NN
・ 2chTimes
◎ +ニュース新着
・ 2NN新着
・ Headline BBY
◎ +ニュース他
・ Desktop2ch
・ 記者別一覧
◎ 全板
・ 全板縦断勢いランキング
・ スレッドランキング総合ランキング
◎ 実況込み
・ 2勢
・ READ2CH
・ i-ikioi
※ 要サイト名検索
118:nobodyさん
17/12/30 15:38:46.85 YhlYw6jg.net
誰でも簡単にネットで稼げる方法など
参考までに、
⇒ 『半藤のブブイウイウレレ』 というサイトで見ることができます。
グーグル検索⇒『半藤のブブイウイウレレ』
51204SY4AW
119:絆會系「由仁総業」の谷奥由浩組長を拳銃で
23/03/21 02:23:33.99 lCIDEnml.net
津地方裁判所で20日、2022年5月に三重県伊賀市で指定暴力団・絆會系「由仁総業」の谷奥由浩組長を拳銃で撃ち、殺害しようとしたとして殺人未遂などの罪に問われた、事件当時・特定抗争指定暴力団・六代目山口組系三代目一心会傘下「芦川会」組員・清水勇介被告(27)=茨城県水戸市=の判決公判が開かれ、清水被告に懲役15年(求刑・懲役18年)の判決を言い渡した。
判決で津地裁は、「拳銃を至近距離から複数回発砲しており非常に危険な犯行であり、日中の病院駐車場での敢行は市民を巻き込みかねず、地域に大きな不安と恐怖を与えた」と述べ、弁護側の「命中していない4発目の弾丸は、被害者に向けて撃っていない」との主張に対しては、「被害者に対する未必的な殺意にとどまるにしても、結果は重大」として、清水被告に懲役15年を言い渡した。
事件当時、芦川会組員だった清水被告は2022年5月10日午前11時半ごろ、伊賀市内の病院の駐車場で谷奥組長の足などを拳銃で撃ち、殺害しようとしたとされている。清水被告は、事件の4日後の14日午後に千葉県内の警察署に出頭した。