08/07/25 08:24:15 GnsNiBzo0
たからじまのみかか変換のサイトって使えなくなったのねん。もう我慢時流だから、出しちゃうね。昔から使ってるやつだけど。
#!/usr/bin/perl
# -*- coding: euc-jp-unix -*-
use encoding "euc-jp";
use open IN => ":utf8";
use open OUT => ":utf8";
my %table = (
"ぬ" => "1", "ふ" => "2", "あ" => "3", "う" => "4", "え" => "5", "お" => "6", "や" => "7", "ゆ" => "8", "よ" => "9", "わ" => "0", "ほ" => "-", #"へ" => "^", #
"た" => "q", "て" => "w", "い" => "e", "す" => "r", "か" => "t", "ん" => "y", "な" => "u", "に" => "i", "ら" => "o", "せ" => "p", #"゛" => "@", #"゜" => "[", #
"ち" => "a", "と" => "s", "し" => "d", "は" => "f", "き" => "g", "く" => "h", "ま" => "j", "の" => "k", "り" => "l", #"れ" => ";", #"け" => ":", #"む" => "]", #
"つ" => "z", "さ" => "x", "そ" => "c", "ひ" => "v", "こ" => "b", "み" => "n", "も" => "m",
#"ね" => ",", #"る" => ".", #"め" => "/", #"ろ" => "\", #
);