#####################################################
my @report;
Scan::ScanAll(\@addr, \@port, \@report);  #bugs here "bug1";
printf "Report ref is : @report \n"; 	#"tag1" to see if script can run here
                           
                     
Report::TxtReport(@report);
system("gedit report.txt");

######################################################