Help for this page
Use of uninitialized value $_[0] in substitution (s///) at /System/Lib +rary/Perl/5.18/File/Basename.pm line 341, <GEN0> line 10. fileparse(): need a valid pathname
my $basename = basename (@TIFFfolder_list, ".psd"); print "$basename\n";