sub add ($$) {$_[0] + $_[1]} my @arr = (3, 4); print add(@arry); #### sleep 2.5; #### $ perl -wle 'print+(localtime())[5]' 105