$locip =~ s/\./,/gi;是壹個正則表達式匹配,對變量$locip進行替換,將$locip中的點(.)替換成逗號(,),g和i都是附加選項,g表示全局替換,就是所有的點(.)都替換成逗號(,),i是忽略大寫,這裏沒有什麽用
$_也是perl的內置變量,是perl中用的最多的默認變量,壹般比如妳寫壹個循環:foreach (@my_array) { print $_; }
這個循環沒有指定變量,每次遍歷數組my_array的時候就把值賦給了$_,所以妳這樣就可以把my_array數組中的每個元素都打印出來