this is the code i wrote to fetch some website. Although theres nothing wrong with the code it gives an error "Use of uninitialized value in print at Perl-1.pl line 25, <MANFWORKFILE> li ne 298." this is the code.... where have i gone wrong?

#!/usr/bin/perl -w
use strict;

use LWP::Simple;

my @manfCode; my @next_lines; my $manf;

my $counter = 0; open (MANFWORKFILE,
'C:\MyWork\OptionsDB\Belkin\Wizards\PdaConfig\manf_junk.txt'); while (
+defined($_
= <MANFWORKFILE>)){
    if (/PDAConfigListModels\.asp/){
        @manfCode = split(/manufacturerID\=/, $_); $manfCode[1] =~ s/\
+"\>//g;
        
        push @next_lines, scalar(<MANFWORKFILE>) if /PDAConfigListMode
+ls\.asp/;
        $next_lines[$counter] =~ s/^[\s]+//;
        
        print $manfCode[1].$next_lines[$counter];
        
        $manfCode[1] =~ s/\s+//; $counter ++;
        
        my $response =
        get("http://web.belkin.com/config/pda/PDAConfigListModels.asp?
+sid=167240621&manufacturerID=$manfCode[1]");
        open (INDEXFILE,
        '>C:\MyWork\OptionsDB\Belkin\Wizards\PdaConfig\model_junk.txt'
+) or die
        ("Can't open out File: $!\n"); print INDEXFILE $response; clos
+e
        INDEXFILE;
    }
} close MANFWORKFILE;
[download]

20040818 Edit by ysth: change title from cookie ERROR?????