According to stat, pop( @file_info ) returns actual number of blocks allocated. You are performing localtime() on an incorrect type of argument. Instead, you may be looking for:
# last modify time in seconds since the epoch
my $timestamp = $file_info[9];