in reply to Re^3: Combining files
in thread Combining files

Using Perl? Perhaps I need to write a Perl program in to do that step. The Perl program one liner could have a system call in it. Maybe actually it would be better if a Perl execution was incorporated into the DOS prompt argument? Maybe something like: 


type *>"perl -w while(<STDIN>){$_ =! /Total\s\d{1,5}/g;}}" >..\newFile

#This is rubbish I know.  Just as an example though.

[download]

Replies are listed 'Best First'.
Re^5: Combining files
by vitoco (Hermit) on Oct 02, 2009 at 15:10 UTC

    Use pipe "|" instead of ">" to pass data from one program to another:

    type * | perl -ne "print unless /^Total\s\d{1,5}/" > ..\newFile

    [download]

    Using only Perl:

    perl -e "while (<*>) {open(F,$_) or next;while(<F>){print unless /^Tot
+al\s\d{1,5}/}}" > ..\newFile

    [download]

    Note: this code has errors, but works as an example.

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom