Trovato!!!

tuttavia non viene fatto in perl ma tramite il comando "ls" di unix:

codice:
#!/usr/bin/perl

use strict;
use warnings;

my ($latest) = qx(ls -1t ~/images); chomp($latest);

print "$latest\n";

# $latest contiene l'immagine più recentemente uploadata...