死刑大国 中国の実態 1/2 動画 YouTube
http://www.youtube.com/watch?v=8xlYHcRyTLI
死刑大国 中国の実態 2/2 動画 YouTube
http://www.youtube.com/watch?v=QR-H7crQggA&feature=related
死刑制度の世界地図 （青色は死刑を廃止した国）
じじぃが勝手に各国(9ヵ国)の死刑制度を調べてみた。
世界の死刑制度の現状
出典: 『ウィキペディア（Wikipedia）』2008年1月1日
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
ドイツ（1949年に廃止） ◎
フランス（1981年に廃止） ◎
イギリス（1998年に廃止） ◎
大韓民国 （存続） ○
死刑制度が存置されているが、10年以上死刑執行が凍結されている。
ロシア（存続） ○
死刑制度が存置されているが、10年以上死刑執行が凍結されている。
アメリカ （存続） △
民主主義国家最多の死刑執行数。ただし近年は合衆国最高裁が死刑の適用を制限する判例を出したため、判決言い渡し及び死刑執行は減少傾向にある。
なお全米13州と海外領土では死刑制度が廃止されている。
アメリカの死刑制度の無い州に比べて死刑制度のある州の凶悪犯罪発生率は統計的に高い。
インド（存続） ▲
日本 （存続） ▲
先進国で唯一死刑執行数が増加傾向にある。
中国 （存続） ■■
世界最大の死刑執行数。死刑適用も殺人から汚職や強姦、誘拐、国家反逆罪など幅が広い。そのため中国の人権問題の一つとして国際的非難をされることもある。
イタリアの人権団体の報告書によると、2006年に全世界で計5628人が処刑されたが、中国は5000人を占めた。
過去にイギリスやポルトガルの植民地であった香港（1993年廃止）とマカオには現在でも死刑制度が無い 。
公開処刑は中国、イラン、北朝鮮、サウジアラビアなどで行われる。
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
話変わって
perlとrubyの比較のため文字列の中に半角カタカナが存在するかのチェックプログラムを作ってみた。
文字列がUTF-8コードの場合。
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
・perlの場合 （regexp1.pl）
use Encode;
my $utf8 = "11aaｱａａ１１";
#my $utf8 = "｡ｱｲｳｴｵｶｷｸｹｺｻｼｽｾｿﾀﾁﾂﾃﾄﾅﾆﾇﾈﾉﾊｲﾌﾍﾎﾏﾐﾑﾒﾓﾗﾘﾙﾚﾛﾔﾕﾖﾜﾝﾟ";
if ($utf8 =~ /(?:\xEF\xBD[\xA1-\xBF]|\xEF\xBE[\x80-\x9F])/){
if ($utf8 =~ /^(?:\xEF\xBD[\xA1-\xBF]|\xEF\xBE[\x80-\x9F])+$/){
print encode('shift-jis', decode('utf-8', "文字列のすべてが半角カタカナである\n"));
}else{
print encode('shift-jis', decode('utf-8', "文字列に半角カタカナが存在する\n"));
}
}else{
print encode('shift-jis', decode('utf-8', "文字列に半角カタカナが存在しない\n"));
}
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
・rubyの場合 （regexp1.rb）
require 'kconv'
utf8 = "11aaｱａａ１１"
#utf8 = "｡ｱｲｳｴｵｶｷｸｹｺｻｼｽｾｿﾀﾁﾂﾃﾄﾅﾆﾇﾈﾉﾊｲﾌﾍﾎﾏﾐﾑﾒﾓﾗﾘﾙﾚﾛﾔﾕﾖﾜﾝﾟ"
if utf8 =~ /(?:\xEF\xBD[\xA1-\xBF]|\xEF\xBE[\x80-\x9F])/
if utf8 =~ /^(?:\xEF\xBD[\xA1-\xBF]|\xEF\xBE[\x80-\x9F])+$/
puts Kconv.tosjis("文字列のすべてが半角カタカナである")
else
puts Kconv.tosjis("文字列に半角カタカナが存在する")
end
else
puts Kconv.tosjis("文字列に半角カタカナが存在しない")
end
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
実行結果
文字列に半角カタカナが存在する
