Hi

This is your seventh post, you should

• be using code tags, see Markup in the Monastery
• show your code :) sample input, actual and wanted output, and how they're different... How do I post a question effectively?
• not use Please in your title, or tell (since you're not asking about tell :) See How do I compose an effective node title?

So I made an effort to determine how to format your data (begining with "direct is-->") but couldn't come up with anything satisfactorily consistent and providing context to understand your problem.

In other words, I'm still not sure what you're trying to show us.

So please, reformat your post using Markup in the Monastery to make it readable.

And perhaps you can clarify the underlying issue, as well. And you may wish to heed the advice at point 1. of On asking for help.

To me looks like "direct" has "ory" omitted, and "filename1" is a variable which is being modified 4 times instead of using four different variables. OP, then, seems to be asking about how to obtain base file name prefix (from a absolute path component) to generate four different file names from a list of four suffixes.

Plausible.

You certainly made better progress than I!

Maybe (do we think?)... maybe OP should read the PerlMonks FAQ and include code?

On second thought, never mind my interpretation for the OP does know about fileparse().