Select Code to Download

#!perl
use warnings;
...

my $timestamp = pop( @file_info );
print my $date = localtime $timestamp;

Argument "" isn't numeric in localtime at examples.pl line 13.