perl qw以空格為分隔符問題的解決方法
更新時間：2013年03月20日 23:08:56 作者：
perl中創(chuàng)建數(shù)組時，可以使用到qw。但考慮到英文名稱中間的空格等情況就需要單獨處理了
perl中創(chuàng)建數(shù)組時，可以使用到qw。
但有一個問題，如果要創(chuàng)建有20個人名組成的數(shù)組，并且每個人的名字是這種形式的"Join smith" "Harry Potter"也就是每一個名字既包含姓也包含名。此時，qw就不起作用了。因為qw是用空格作為分隔符。
下面提供一些替代的解決方案，供大家參考。
方案一：
用最原始的方案，也就是雙引號，來進行數(shù)組的創(chuàng)建
復制代碼 代碼如下:
@names=("Join smith","Harry Potter");
print @names[0];
結(jié)果如下：
F:\>perl\b.pl
Join smith
F:\>
方案二：
我們可以進行一下簡單的變通，qw只能以空格為分隔符，那我們把人名中間的空格用其他的字符進行替代。
@names=qw/Join_smith Harry_Potter/;
#然后當我們輸出的時候我們再把中間的連接符進行替換
復制代碼 代碼如下:
@names[0]=~s/_/ /g;
print @names[0];
結(jié)果如下；
F:\>perl\b.pl
Join smith
F:\>
方案三：
利用split函數(shù)進行創(chuàng)建。
復制代碼 代碼如下:
#首先我們定義一個變量
$names="Join smith,Harry potter",
#這里利用split函數(shù)，這里split//兩個斜線之間就是你要分割的地方，本例中以逗號為分割界限
my @names=split/,/,$names;
rint @names[0];
結(jié)果如下：
F:\>perl\b.pl
Join smith
F:\>
相關(guān)文章
使用腳本實現(xiàn)自動清除指定文件夾下丟失鏈接文件的符號鏈接
這篇文章主要介紹了使用腳本實現(xiàn)自動清除指定文件夾下丟失鏈接文件的符號鏈接,本文給大家介紹的非常詳細，具有一定的參考借鑒價值，需要的朋友可以參考下2020-02-02
perl實現(xiàn)的兩個文件對比并對數(shù)據(jù)進行篩選的腳本代碼
對比兩個文件并對數(shù)據(jù)進行篩選的perl腳本，涉及到哈希的應(yīng)用和perl編程風格的改變。有需要的朋友可以參考下2013-03-03
php是用了很久了,python和ruby與用過,經(jīng)典腳本語言就perl沒摸過，現(xiàn)在在像小學生一樣抱著教科書啃。2008-09-09
寫過很多關(guān)于Perl編程，今天繼續(xù)分享一篇利用perl后門實現(xiàn)正向和反向連接的實例代碼，需要的朋友可以參考下其中的內(nèi)容詳情2008-05-05
perl寫的生物突變的隨機模擬程序，有需要的朋友可以參考下2013-03-03
perl去除重復內(nèi)容的腳本代碼(重復行+數(shù)組重復字段)
perl去除重復內(nèi)容的小腳本，有需要的朋友可以參考下,包括重復行、數(shù)據(jù)組中重復的字段2013-03-03
本文和大家重點討論一下Perl方法的概念，Perl方法定義不提供任何特殊語法，但規(guī)定Perl方法的第一個參數(shù)為對象或其被引用的包。Perl有兩種Perl方法：靜態(tài)Perl方法和虛Perl方法2013-03-03
perl對中文的處理(encode,decode) 最近在處理中文時遇到亂碼的問題，google了一下，發(fā)現(xiàn)下面這篇文章。茅塞頓開！2008-10-10
在編程時把一段代碼注釋掉，即通過注釋的方法，使其不能夠運行，但是依然存在于代碼中，等以后需要時再去掉注釋2013-03-03
這兩天在用Perl編寫一些監(jiān)控腳本，其實寫代碼也是一件挺有意思的事情，就是挺廢時間的。而且，由于語法不太熟，基本想到一個東西都要先Google一下看怎么實現(xiàn)。2008-06-06