What do you wish to accomplish? What is your goal in looking at these files - do you wish to examine each file in the array?
-----Original Message----- From: Mike Singleton [mailto:[EMAIL PROTECTED]] Sent: Tuesday, September 10, 2002 9:12 AM To: [EMAIL PROTECTED] Subject: output off Your right, 'open' works just fine. However, the output is just the list of files from @files... not the parsed output. I must be on the wrong track, sorry... == start === #! perl -w use strict; my @files = glob('3D21*.log'); open(OUTFILE,">myfile.csv"); while(<@files>){ my @f = split /s+/,$_,9; print OUTFILE join(',',@f)."\n"; } === End==== attached are some sample log file to run against. DaVita Inc. _______________________________________________ Perl-Win32-Admin mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
