網路管理語言 Perl 入門與實作:
<<< Previous	4. Perl 的資料型態	Next >>>

4.2.8 unshift

由陣列頭部，置入一個元素：

#! /usr/bin/perl

@total=(2, 4, 6, 1, 3, 5, "a", "b", "c");

$f1="A";

unshift @total, $f1;

print @total;
# 此時 @total 應為 ("A", 2, 4, 6, 1, 3, 5, "a", "b", "c");

也可以置入另一個陣列：

#! /usr/bin/perl

@total=(2, 4, 6, 1, 3, 5, "a", "b", "c");

@t2=qw( John Marry Kenny );

unshift @total, @t2;

print @total;
# 此時 @total 應為 ("John", "Marry", "Kenny", 2, 4, 6, 1, 3, 5, "a", "b", "c");

<<< Previous	Home	Next >>>
4.2.7 shift	Up	4.2.9 拷貝一個陣列