Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

Re: System command not working

by jwkrahn (Monsignor)
on Jul 10, 2012 at 09:50 UTC ( #980845=note: print w/ replies, xml ) Need Help??

in reply to System command not working

perl -ne 'print if $. >= 17 && $. <= 30' infile.txt > output.txt

That can be written more simply as:

perl -ne 'print if 17 .. 30' infile.txt > output.txt

The comparison to $. is done automatically.

Your program needs a while loop:

open INFILE, '<', $inFile or die "Can't open $inFile : $!"; open OUTFILE, '>', $outFile or die "Can't open $outFile : $!"; while ( <INFILE> ) { print OUTFILE if 17 .. 30; } close INFILE or die "can't close $inFile : $!"; close OUTFILE or die "can't close $outFile : $!";

Comment on Re: System command not working
Select or Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (12)
As of 2015-12-01 16:26 GMT
Find Nodes?
    Voting Booth?

    My keyboard shows this many letters:

    Results (19 votes), past polls