G'day spatil20,

Welcome to the Monastery.

Firstly, PerlMonks does not provide a code writing service. We're happy to help with problems and answer questions about code you've written; however, we don't write your code for you. "How (Not) To Ask A Question" has more details about this (the negative what not to do). "How do I post a question effectively?" is the positive side of this coin, i.e. what you should do.

Without knowing your level of Perl, I'll point you to "perlintro - Perl Introduction for Beginners". This is very basic but each section has links to further details and advanced topics — I'll leave you to determine where the holes in your Perl knowledge lie and which links are appropriate for you.

Your code and data should be marked up within <code>...</code> tags. What you've posted is not that easy to read but part of it appears to be (pipe-separated) CSV: I strongly recommend you use the Text::CSV module for dealing with this.

When you've written some code, feel free to return and ask questions about it, if need be.

- perlre describes regular expressions, needed to differentiate between files that match different patterns.

- the glob <regexp> function returns the list of files matching the regexp.

- the split function can be used to populate an array from the delimited substrings of a single string.

You originally posted a single block of undifferentiated text. You've now changed that to be five separate paragraphs.

When you make changes to your post, without indicating that a change has been made, you can invalidate comments made about your original post. This has happened here with my statement: "What you've posted is not that easy to read ...". This is all explained in "How do I change/delete my post?".

I appreciate that this is your first post and my intention is not to reprimand you. Simply adding something like "Update: split post into paragraphs to improve readability" fixes the problem.

You originally posted a single block of undifferentiated text. You've now changed that to be five separate paragraphs.

It seems that the OP turned it back to a single block of undifferentiated text. This is what I can see as of the time of this post:

I have 3 file's like below in '/developer/ram/inbox' folder file1:-NVA_CUTSTD10-INF-20150701.txt file2:-NVA_CUTSTD10-INF-20150716.txt file3:-NVA_CUTSTD10-INF-20150801.txt please help to write Perl scripts that will pickup old file1'NVA_CUTSTD10-INF-20150701.txt' and then it need create below .txt.trig file like below file name:- NVA_CUTSTD10-INF-20150701.txt.trig and the file contain cat NVA_CUTSTD10-INF-20150701.txt.trig output:-NVA|NVA_CUTSTD10-INF-20150701.txt|2015-08-10|9756||||||| .txt.trig contains as follows:- 1. nva :- project name 2.file name:-'NVA_CUTSTD10-INF-20150701.txt 3.date:-current date 4.file count:-9756 5.|||||| default fields need to pass.

Strange, isn't it?

Yes, that single block of text looks very much like the first post I originally responded to.

It's gone from hard to read, to somewhat easier to read, and back to hard to read.

I've no idea what the OP's intent was in doing this and have little interest in chasing this any further.

— Ken