あたらしいの

if($remo =~ /\.tns\.ne\.jp$/) {return 67;} #.tns.ne.jp()
if($remo =~ /\.warabi\.ne\.jp$/) {return 67;} #.warabi.ne.jp()
if($remo =~ /\.stnet\.ne\.jp$/) {return 67;} #.stnet.ne.jp()
if($remo =~ /\.bmobile\.ne\.jp$/) {return 67;} #.bmobile.ne.jp()
if($remo =~ /\.meon\.ne\.jp$/) {return 67;} #.meon.ne.jp()
if($remo =~ /\.hinanet\.ne\.jp$/) {return 67;} #.hinanet.ne.jp()
if($remo =~ /\.nima-cho\.ne\.jp$/) {return 67;} #.nima-cho.ne.jp()
if($remo =~ /\.nus\.ne\.jp$/) {return 67;} #.nus.ne.jp()
if($remo =~ /\.tv-naruto\.ne\.jp$/) {return 67;} #.tv-naruto.ne.jp()
if($remo =~ /\.access-internet\.ne\.jp$/) {return 67;} #.access-internet.ne.jp()
if($remo =~ /\.cat-v\.ne\.jp$/) {return 67;} #.cat-v.ne.jp()
if($remo =~ /\.stnet\.ne\.jp$/) {return 67;} #.stnet.ne.jp()
if($remo =~ /\.mct\.ne\.jp$/) {return 67;} #.mct.ne.jp()