Select Code to Download

my $year = (localtime((stat($file))[9]))[5] + 1900;

my $sixth = (foo(@args))[5];

my $sixth = [foo(@args)]->[5];

my $year = [localtime([stat($file)]->[9])]->[5] + 1900;