0707nobodyさん垢版 | 大砲2014/07/12(土) 14:04:00.64ID:??? 以下をまるごとコメントにせい =comment if ($host =~ /(.*)\.(\d+)$/) { ; } elsif ($host =~ /(.*)\.(.*)\.(.*)\.(.*)$/) { $host = "\*\.$2\.$3\.$4"; } elsif ($host =~ /(.*)\.(.*)\.(.*)$/) { $host = "\*\.$2\.$3"; } =cut