my $file_name = param('photo');

use Data::Dumper;

print Dumper($CGI::Q->{'.tmpfiles'});