あっ違うか、、
if($hhh =~ /\.or.jp$/) {return 0;}
だから適用されていない