Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

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 : $!";

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://980845]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (9)
As of 2017-03-30 18:06 GMT
Find Nodes?
    Voting Booth?
    Should Pluto Get Its Planethood Back?

    Results (362 votes). Check out past polls.