perl 中的split 与 join

cat /etc/passwd |perl -e 'while (<>) {@a = split /:/, $_; @b = join " # ", @a; print "@b";}'

split格式为
split /分隔符/,  字符串；

join格式为
join “分隔符",  数组；