Re: extract and export to multiple files

[kiruthika.bkite]

The problems in your code are, You have opened the file using ,

open (OUT, ">$filename"."$title"."$count") or die "can't open";

But that time the variables $filename,$title,$count are not having any values.

Actually this line should come inside the while loop after getting the title and content from the file.

And you need to close that file immediately after printing the content into that file .

It should be like this,

while (<FILE>)
{
    chomp;
    ($title, $content) = split("\t");
    open (OUT, ">","$title.$count") or die "can't open";
    $count++;
    print OUT "$content";
    close OUT;

}