Re^3: Coping a part of text file

Ok, here is my commentary

sub To_header
{
    my( $outfile, $startix, $endix , $words ) = @_;
    use autodie;
    open my($outfh), '>', $outfile ; ## or die by autodie
    for my $ix ( $startix .. $endix ){
        print $outfh $words->[ $ix ];
    }
    close $outfh;
}
To_header( 'hr.txt', 0, $temp[0], \@words );
[download]

If you want something more specific you'll have to provide more details as How do I post a question effectively? and davido explain

Comment on Re^3: Coping a part of text file Download Code

Replies are listed 'Best First'.
Re^4: Coping a part of text file by Anonymous Monk on Jul 04, 2013 at 08:17 UTC
hey one small point , that instead of splitting into words , we have the start index and where to stop , where ever we find the word Data List , so we just have to copy that exact block from one file to another , can we use grep in that file to search for it and copy paste that using script , just an idea can we do it	[reply]
Re^5: Coping a part of text file by Anonymous Monk on Jul 04, 2013 at 08:25 UTC
hey one small point , that instead of splitting into words , we have the start index and where to stop , where ever we find the word Data List , so we just have to copy that exact block from one file to another , can we use grep in that file to search for it and copy paste that using script , just an idea can we do it grep as in grep or grep? I imagine grep could be involved , but its probably not the best fit based on what I've read in this thread, Outlook not so good	[reply]