open (FILE, $filename);
	while(<FILE>){
		

		# walk each file
		my $line = $_ ;
		chomp $line;

		
		#grabbing and printing everything between the body tags
		if (/<body.*?>/i ... /<\/body.*?>/i){
		 # this is a body line
	 	 # extract the body
		 
		
		##Changing .html to .asp at the end of every link that does not belong to an external link
		 if ($_ !~ m/href=\"http:\/\/.+\.html/) { s/(href=.+?\.)html/$1asp/gi }

               ###this is where i need to find and delete those certain include files

		 $body_temp = $_;
		 $body_temp =~ s/(.*?)\<body\>(.*?)\<\/body\>/$2/i;
		 chomp($body_temp);

		 $body = "$body_temp" ;
		
		 # Write the body to the output file
		 print OUTFILE $body . "\n";
		}
	}
	close(FILE);