Re^3: Opening multiple log files

The builtin glob function will probably do what you want. Just make sure you check the "Portability issues" noted in that document.

Something like:

my @logfiles = glob "*.log";
[download]

then just iterate @logfiles, processing each in turn.

Because you said "... all of the files(many) in the same directory ..." you may exceed a maximum size. See GLOB_LIMIT in File::Glob for details.

If you are likely to approach that limit, a better option (although, a bit more coding) would be to use readdir.

You'll need to skip everything except normal files with a .log extension. Something like this (untested):

while(readdir $dh) {
    next unless -f and /\.log$/;
    # Process log file here
}
[download]

See File Test Operators if you're unfamiliar with -f.

-- Ken

Comment on Re^3: Opening multiple log files Select or Download Code

Replies are listed 'Best First'.
Re^4: Opening multiple log files by hahazeeq (Novice) on Jun 15, 2015 at 08:06 UTC
I see. Alright, I won't be using modules cause I'm still learning so I want to do more of the coding first. I understand the code you have provided would read every file in the directory which have the .log extension. However, is there anyway anyway to get the file name as well? If you notice at the second part of my code I am trying to get the file that I have opened(which is formatted in a timestamp)to use it to print in the file I'm going to create. I'm not sure how to do that with your codes.	[reply]
Re^5: Opening multiple log files by kcott (Archbishop) on Jun 15, 2015 at 08:33 UTC
"... I won't be using modules ..." I not certain what you're getting at here. The link to `File::Glob` was for documentation to read, not a module to use. The link to `glob()` explains this. Besides, you're already using three modules: `use strict; use warnings; use POSIX 'strftime';` [download] "... is there anyway anyway to get the file name as well?" The filename that `-f` operates on? The filename that `/\.log$/` is attempting match? -- Ken	[reply] [d/l] [select]
Re^6: Opening multiple log files by hahazeeq (Novice) on Jun 15, 2015 at 09:17 UTC
I see. Pardon me, I assumed anything with a :: was a module.I still do not know how to integrate it though. What I meant for the file name was I used a variable in my second part but I'm not sure how the "next unless -f and /\.log$/" has a variable that I can use for my code in the second part.	[reply]
Re^7: Opening multiple log files by kcott (Archbishop) on Jun 16, 2015 at 02:48 UTC
Re^5: Opening multiple log files by Anonymous Monk on Jun 15, 2015 at 09:14 UTC
I see. Alright, I won't be using modules cause I'm still learning so I want to do more of the coding first. The most important thing you can do is start creating subroutines , your gets shorter the more you do this `{ my %details; for my $infile( @inputFiles ){ FillDetails( \%details, $infile ); } SpillDetails( \%details, $outfile ); } exit( 0 );` [download]	[reply] [d/l]