スパム業者への反撃を真剣に考えるスレat ANTISPAM
スパム業者への反撃を真剣に考えるスレ - 暇つぶし2ch37:名無しプログラマ ◆UUguph2t1E
05/03/13 08:47:55 hbTNnBI9
Perlで書いてみた。

$s = '090xxxxxxxx'; # 電話番号を入れる
$s =~ s/-//; # -を除去
$s =~ s/^0//; # 先頭の0を除去
$s =~ s/../sprintf("%02X",$&)/ge; # 2桁ずつ16進数に直す

print <<EOF;
URLリンク(pa9.ne.jp)
URLリンク(ao.jp)
URLリンク(pmat.jp)
URLリンク(kn.jp)
EOF

サイトの収集用
URLリンク(www.google.co.jp)


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