perl qw以空格為分隔符問題的解決方法
perl中創(chuàng)建數(shù)組時(shí),可以使用到qw。
但有一個(gè)問題,如果要?jiǎng)?chuàng)建有20個(gè)人名組成的數(shù)組,并且每個(gè)人的名字是這種形式的"Join smith" "Harry Potter"也就是每一個(gè)名字既包含姓也包含名。此時(shí),qw就不起作用了。因?yàn)閝w是用空格作為分隔符。
下面提供一些替代的解決方案,供大家參考。
方案一:
用最原始的方案,也就是雙引號,來進(jìn)行數(shù)組的創(chuàng)建
@names=("Join smith","Harry Potter");
print @names[0];
結(jié)果如下:
F:\>perl\b.pl
Join smith
F:\>
方案二:
我們可以進(jìn)行一下簡單的變通,qw只能以空格為分隔符,那我們把人名中間的空格用其他的字符進(jìn)行替代。
@names=qw/Join_smith Harry_Potter/;
#然后當(dāng)我們輸出的時(shí)候我們再把中間的連接符進(jìn)行替換
@names[0]=~s/_/ /g;
print @names[0];
結(jié)果如下;
F:\>perl\b.pl
Join smith
F:\>
方案三:
利用split函數(shù)進(jìn)行創(chuàng)建。
#首先我們定義一個(gè)變量
$names="Join smith,Harry potter",
#這里利用split函數(shù),這里split//兩個(gè)斜線之間就是你要分割的地方,本例中以逗號為分割界限
my @names=split/,/,$names;
rint @names[0];
結(jié)果如下:
F:\>perl\b.pl
Join smith
F:\>
相關(guān)文章
使用腳本實(shí)現(xiàn)自動(dòng)清除指定文件夾下丟失鏈接文件的符號鏈接
這篇文章主要介紹了使用腳本實(shí)現(xiàn)自動(dòng)清除指定文件夾下丟失鏈接文件的符號鏈接,本文給大家介紹的非常詳細(xì),具有一定的參考借鑒價(jià)值,需要的朋友可以參考下2020-02-02
perl實(shí)現(xiàn)的兩個(gè)文件對比并對數(shù)據(jù)進(jìn)行篩選的腳本代碼
對比兩個(gè)文件并對數(shù)據(jù)進(jìn)行篩選的perl腳本,涉及到哈希的應(yīng)用和perl編程風(fēng)格的改變。有需要的朋友可以參考下2013-03-03
用perl實(shí)現(xiàn)生物突變的隨機(jī)模擬程序代碼
perl寫的生物突變的隨機(jī)模擬程序,有需要的朋友可以參考下2013-03-03
perl去除重復(fù)內(nèi)容的腳本代碼(重復(fù)行+數(shù)組重復(fù)字段)
perl去除重復(fù)內(nèi)容的小腳本,有需要的朋友可以參考下,包括重復(fù)行、數(shù)據(jù)組中重復(fù)的字段2013-03-03

