Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re^4: Combining files

by Win (Novice)
on Oct 02, 2009 at 12:29 UTC ( #798841=note: print w/replies, xml ) Need Help??


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.

Replies are listed 'Best First'.
Re^5: Combining files
by vitoco (Friar) 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

    Using only Perl:

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

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

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://798841]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (6)
As of 2019-12-15 13:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?