溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務(wù)條款》
您好，登錄后才能下訂單哦！
這篇文章主要介紹了perl中如何對數(shù)組字符串取交集，并集，差集包，具有一定借鑒價值，感興趣的朋友可以參考下，希望大家閱讀完這篇文章之后大有收獲，下面讓小編帶著大家一起了解一下。
Array::Utils ，perl中對兩個數(shù)據(jù)取交集，并集 差集等等，union，intersect，diff等操作
我們有時候要對兩個數(shù)據(jù)取一下交集和并集，union，intersect，diff等操作，雖然自己寫腳本也能實現(xiàn)，但是已經(jīng)有包了，為啥不用別人寫好的包呢，這里介紹一個包就是解決這個問題的：Array::Utils 還發(fā)附帶其他功能，很好用：
use Array::Utils qw(:all);
my @a = qw( a b c d );
my @b = qw( c d e f );
# symmetric difference
my @diff = array_diff(@a, @b);
# intersection
my @isect = intersect(@a, @b);
# unique union
my @unique = unique(@a, @b);
# check if arrays contain same members
if ( !array_diff(@a, @b) ) {
# do something
}
# get items from array @a that are not in array @b
my @minus = array_minus( @a, @b );包的詳細(xì)幫助：https://metacpan.org/pod/Array::Utils |
感謝你能夠認(rèn)真閱讀完這篇文章，希望小編分享的“perl中如何對數(shù)組字符串取交集，并集，差集包”這篇文章對大家有幫助，同時也希望大家多多支持億速云，關(guān)注億速云行業(yè)資訊頻道，更多相關(guān)知識等著你來學(xué)習(xí)!
免責(zé)聲明：本站發(fā)布的內(nèi)容（圖片、視頻和文字）以原創(chuàng)、轉(zhuǎn)載和分享為主，文章觀點不代表本網(wǎng)站立場，如果涉及侵權(quán)請聯(lián)系站長郵箱：is@yisu.com進(jìn)行舉報，并提供相關(guān)證據(jù)，一經(jīng)查實，將立刻刪除涉嫌侵權(quán)內(nèi)容。
億速云公眾號
手機(jī)網(wǎng)站二維碼
