in reply to Problem in file name generation (was Re^5: Please tell)in thread Please tell
my($filename1, $directories) = fileparse($file1); print "directory is --> " . $directories; print "filename1 is --> " . $filename1; [download]