perl -ne 'print if $. >= 17 && $. <= 30' infile.txt > output.txt #### #/usr/bin/perl -w my $outFile= ">/home/eyogmuc/Yogesh/Technical/Perl/output.txt"; my $inFile= "/home/eyogmuc/Yogesh/Technical/Perl/infile.txt"; open INFILE, $inFile or die "Can't open $inFile : $!"; open OUTFILE, $outFile or die "Can't open $outFile : $!"; #system(`print if $. >= 17 && $. <= 30 INFILE >> OUTFILE`); system("'print if $. >= 17 && $. <= 30' infile.txt > output.txt" ); close INFILE or die "can't close $inFile : $!"; close OUTFILE or die "can't close $outFile : $!";