Array Perl

($atime, $mtime) = (stat 'timer.pl')[8, 9];