如何在Perl中聲明一個數組的子集？

Question

我即將做這樣的事情：

my ($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime(time); 

但我並不需要所有這些變量（只分鍾，$小時，$星期一，$年被通緝）。

是否有一個簡單的解決方案來聲明perl中只有必填字段？

一個簡單的解決方案，我是這樣的，但它不是真的「性感」：

my @day = localtime(time); 
my $min = $day[1]; 
my $hour = $day[2]; 
my $day = $day[3]; 
... 

預先感謝您的任何一個誰可能是能夠給我一些想法:)

Answer 1

您可以指定要使用slices其中數組的元素。

my ($min,$hour,$mon,$year) = (localtime(time))[1,2,4,5]; 

Answer 2

好， 「性感」是有點主觀的，但我認爲這是你的意思：

my (undef,$min,$hour,undef,$mon,$year) = localtime(time);