Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @down_auto_total_praguri = (10,12,20);
- @down_auto_total_colors = ("#4CC552","#FDD017","#C35617");
- @drops_relativ_praguri = (1,2,3);
- @drops_relativ_colors = ("#4CC552","#FDD017","#C35617");
- @rssi_minim_praguri = (-108,-109,-111);
- @rssi_minim_colors = ("#4CC552","#FDD017","#C35617");
- @rssi_maxim_praguri = (-107,-106,-105);
- @rssi_maxim_colors = ("#4CC552","#FDD017","#C35617");
- #######################################################################
- print "Site: ";
- $input = <>;
- chomp($input);
- open(INFO, "./pmxh_print.txt");
- @info = <INFO>;
- $printout = join("",@info);
- print "\nNumele directorului:\t";
- $nume_director = <>;
- chomp($nume_director);
- mkdir "./$nume_director";
- $a=1;
- $b=2;
- $c=3;
- $d=4;
- $e=5;
- $f=6;
- $g=7;
- $h=8;
- $l=9;
- @raport_from = ($printout =~ /^(Report from .*)$/mg);
- @cell1_date_hour = ($printout =~ /^(................) UtranCell=cell$input$a\s/mg);
- @cell2_date_hour = ($printout =~ /^(................) UtranCell=cell$input$b\s/mg);
- @cell3_date_hour = ($printout =~ /^(................) UtranCell=cell$input$c\s/mg);
- @cell4_date_hour = ($printout =~ /^(................) UtranCell=cell$input$d\s/mg);
- @cell5_date_hour = ($printout =~ /^(................) UtranCell=cell$input$e\s/mg);
- @cell6_date_hour = ($printout =~ /^(................) UtranCell=cell$input$f\s/mg);
- @cell7_date_hour = ($printout =~ /^(................) UtranCell=cell$input$g\s/mg);
- @cell8_date_hour = ($printout =~ /^(................) UtranCell=cell$input$h\s/mg);
- @cell9_date_hour = ($printout =~ /^(................) UtranCell=cell$input$l\s/mg);
- @cell1_down_auto = ($printout =~ /UtranCell=cell$input$a\s*(\d*?)\s/mg);
- @cell2_down_auto = ($printout =~ /UtranCell=cell$input$b\s*(\d*?)\s/mg);
- @cell3_down_auto = ($printout =~ /UtranCell=cell$input$c\s*(\d*?)\s/mg);
- @cell4_down_auto = ($printout =~ /UtranCell=cell$input$d\s*(\d*?)\s/mg);
- @cell5_down_auto = ($printout =~ /UtranCell=cell$input$e\s*(\d*?)\s/mg);
- @cell6_down_auto = ($printout =~ /UtranCell=cell$input$f\s*(\d*?)\s/mg);
- @cell7_down_auto = ($printout =~ /UtranCell=cell$input$g\s*(\d*?)\s/mg);
- @cell8_down_auto = ($printout =~ /UtranCell=cell$input$h\s*(\d*?)\s/mg);
- @cell9_down_auto = ($printout =~ /UtranCell=cell$input$l\s*(\d*?)\s/mg);
- @cell1_down_man = ($printout =~ /UtranCell=cell$input$a\s*\d*\s*(\d*?)\s/mg);
- @cell2_down_man = ($printout =~ /UtranCell=cell$input$b\s*\d*\s*(\d*?)\s/mg);
- @cell3_down_man = ($printout =~ /UtranCell=cell$input$c\s*\d*\s*(\d*?)\s/mg);
- @cell4_down_man = ($printout =~ /UtranCell=cell$input$d\s*\d*\s*(\d*?)\s/mg);
- @cell5_down_man = ($printout =~ /UtranCell=cell$input$e\s*\d*\s*(\d*?)\s/mg);
- @cell6_down_man = ($printout =~ /UtranCell=cell$input$f\s*\d*\s*(\d*?)\s/mg);
- @cell7_down_man = ($printout =~ /UtranCell=cell$input$g\s*\d*\s*(\d*?)\s/mg);
- @cell8_down_man = ($printout =~ /UtranCell=cell$input$h\s*\d*\s*(\d*?)\s/mg);
- @cell9_down_man = ($printout =~ /UtranCell=cell$input$l\s*\d*\s*(\d*?)\s/mg);
- @cell1_normal_release = ($printout =~ /UtranCell=cell$input$a\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell2_normal_release = ($printout =~ /UtranCell=cell$input$b\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell3_normal_release = ($printout =~ /UtranCell=cell$input$c\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell4_normal_release = ($printout =~ /UtranCell=cell$input$d\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell5_normal_release = ($printout =~ /UtranCell=cell$input$e\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell6_normal_release = ($printout =~ /UtranCell=cell$input$f\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell7_normal_release = ($printout =~ /UtranCell=cell$input$g\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell8_normal_release = ($printout =~ /UtranCell=cell$input$h\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell9_normal_release = ($printout =~ /UtranCell=cell$input$l\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell1_system_release = ($printout =~ /UtranCell=cell$input$a\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell2_system_release = ($printout =~ /UtranCell=cell$input$b\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell3_system_release = ($printout =~ /UtranCell=cell$input$c\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell4_system_release = ($printout =~ /UtranCell=cell$input$d\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell5_system_release = ($printout =~ /UtranCell=cell$input$e\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell6_system_release = ($printout =~ /UtranCell=cell$input$f\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell7_system_release = ($printout =~ /UtranCell=cell$input$g\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell8_system_release = ($printout =~ /UtranCell=cell$input$h\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell9_system_release = ($printout =~ /UtranCell=cell$input$l\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell1_sample_ul_rssi = ($printout =~ /UtranCell=cell$input$a\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell2_sample_ul_rssi = ($printout =~ /UtranCell=cell$input$b\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell3_sample_ul_rssi = ($printout =~ /UtranCell=cell$input$c\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell4_sample_ul_rssi = ($printout =~ /UtranCell=cell$input$d\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell5_sample_ul_rssi = ($printout =~ /UtranCell=cell$input$e\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell6_sample_ul_rssi = ($printout =~ /UtranCell=cell$input$f\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell7_sample_ul_rssi = ($printout =~ /UtranCell=cell$input$g\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell8_sample_ul_rssi = ($printout =~ /UtranCell=cell$input$h\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell9_sample_ul_rssi = ($printout =~ /UtranCell=cell$input$l\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell1_sum_ul_rssi = ($printout =~ /UtranCell=cell$input$a\s*\d*\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell2_sum_ul_rssi = ($printout =~ /UtranCell=cell$input$b\s*\d*\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell3_sum_ul_rssi = ($printout =~ /UtranCell=cell$input$c\s*\d*\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell4_sum_ul_rssi = ($printout =~ /UtranCell=cell$input$d\s*\d*\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell5_sum_ul_rssi = ($printout =~ /UtranCell=cell$input$e\s*\d*\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell6_sum_ul_rssi = ($printout =~ /UtranCell=cell$input$f\s*\d*\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell7_sum_ul_rssi = ($printout =~ /UtranCell=cell$input$g\s*\d*\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell8_sum_ul_rssi = ($printout =~ /UtranCell=cell$input$h\s*\d*\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- @cell9_sum_ul_rssi = ($printout =~ /UtranCell=cell$input$l\s*\d*\s*\d*\s*\d*\s*\d*\s*\d*\s*(\d*?)\s/mg);
- open OUTPUT, ">./$nume_director/cell1.txt";
- for ($i = 0; $cell1_date_hour[$i]; ++$i){
- $down_auto=$cell1_down_auto[$i]/90;
- $down_man=$cell1_down_man[$i]/90;
- $abs_drops=$cell1_system_release[$i];
- $traffic=$cell1_system_release[$i]+$cell1_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- if ($cell1_sample_ul_rssi[$i]){
- $rssi=(($cell1_sum_ul_rssi[$i]/$cell1_sample_ul_rssi[$i])/10)-112;
- }
- else{
- $rssi="";
- }
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $cell1_down_auto_total=$cell1_down_auto_total+$down_auto;
- $cell1_down_man_total=$cell1_down_man_total+$down_man;
- $cell1_system_release_total=$cell1_system_release_total+$abs_drops;
- $cell1_traffic_total=$cell1_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($cell1_rssi_minim eq "") {$cell1_rssi_minim=$rssi;$cell1_rssi_maxim=$rssi}
- if ($cell1_rssi_minim >= $rssi){$cell1_rssi_minim=$rssi}
- if ($rssi >= $cell1_rssi_maxim){$cell1_rssi_maxim=$rssi}
- }
- print OUTPUT "$cell1_date_hour[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/cell2.txt";
- for ($i = 0; $cell2_date_hour[$i]; ++$i){
- $down_auto=$cell2_down_auto[$i]/90;
- $down_man=$cell2_down_man[$i]/90;
- $abs_drops=$cell2_system_release[$i];
- $traffic=$cell2_system_release[$i]+$cell2_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- if ($cell2_sample_ul_rssi[$i]){
- $rssi=(($cell2_sum_ul_rssi[$i]/$cell2_sample_ul_rssi[$i])/10)-112;
- }
- else{
- $rssi="";
- }
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $cell2_down_auto_total=$cell2_down_auto_total+$down_auto;
- $cell2_down_man_total=$cell2_down_man_total+$down_man;
- $cell2_system_release_total=$cell2_system_release_total+$abs_drops;
- $cell2_traffic_total=$cell2_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($cell2_rssi_minim eq "") {$cell2_rssi_minim=$rssi;$cell2_rssi_maxim=$rssi}
- if ($cell2_rssi_minim >= $rssi){$cell2_rssi_minim=$rssi}
- if ($rssi >= $cell2_rssi_maxim){$cell2_rssi_maxim=$rssi}
- }
- print OUTPUT "$cell2_date_hour[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/cell3.txt";
- for ($i = 0; $cell3_date_hour[$i]; ++$i){
- $down_auto=$cell3_down_auto[$i]/90;
- $down_man=$cell3_down_man[$i]/90;
- $abs_drops=$cell3_system_release[$i];
- $traffic=$cell3_system_release[$i]+$cell3_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- if ($cell3_sample_ul_rssi[$i]){
- $rssi=(($cell3_sum_ul_rssi[$i]/$cell3_sample_ul_rssi[$i])/10)-112;
- }
- else{
- $rssi="";
- }
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $cell3_down_auto_total=$cell3_down_auto_total+$down_auto;
- $cell3_down_man_total=$cell3_down_man_total+$down_man;
- $cell3_system_release_total=$cell3_system_release_total+$abs_drops;
- $cell3_traffic_total=$cell3_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($cell3_rssi_minim eq "") {$cell3_rssi_minim=$rssi;$cell3_rssi_maxim=$rssi}
- if ($cell3_rssi_minim >= $rssi){$cell3_rssi_minim=$rssi}
- if ($rssi >= $cell3_rssi_maxim){$cell3_rssi_maxim=$rssi}
- }
- print OUTPUT "$cell3_date_hour[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- $test_down_auto=0;
- open OUTPUT, ">./$nume_director/cell4.txt";
- for ($i = 0; $cell4_date_hour[$i]; ++$i){
- $down_auto=$cell4_down_auto[$i]/90;
- $down_man=$cell4_down_man[$i]/90;
- $abs_drops=$cell4_system_release[$i];
- $traffic=$cell4_system_release[$i]+$cell4_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- if ($cell4_sample_ul_rssi[$i]){
- $rssi=(($cell4_sum_ul_rssi[$i]/$cell4_sample_ul_rssi[$i])/10)-112;
- }
- else{
- $rssi="";
- }
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $cell4_down_auto_total=$cell4_down_auto_total+$down_auto;
- $cell4_down_man_total=$cell4_down_man_total+$down_man;
- $cell4_system_release_total=$cell4_system_release_total+$abs_drops;
- $cell4_traffic_total=$cell4_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($cell4_rssi_minim eq "") {$cell4_rssi_minim=$rssi;$cell4_rssi_maxim=$rssi}
- if ($cell4_rssi_minim >= $rssi){$cell4_rssi_minim=$rssi}
- if ($rssi >= $cell4_rssi_maxim){$cell4_rssi_maxim=$rssi}
- }
- print OUTPUT "$cell4_date_hour[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/cell5.txt";
- for ($i = 0; $cell5_date_hour[$i]; ++$i){
- $down_auto=$cell5_down_auto[$i]/90;
- $down_man=$cell5_down_man[$i]/90;
- $abs_drops=$cell5_system_release[$i];
- $traffic=$cell5_system_release[$i]+$cell5_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- if ($cell5_sample_ul_rssi[$i]){
- $rssi=(($cell5_sum_ul_rssi[$i]/$cell5_sample_ul_rssi[$i])/10)-112;
- }
- else{
- $rssi="";
- }
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $cell5_down_auto_total=$cell5_down_auto_total+$down_auto;
- $cell5_down_man_total=$cell5_down_man_total+$down_man;
- $cell5_system_release_total=$cell5_system_release_total+$abs_drops;
- $cell5_traffic_total=$cell5_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($cell5_rssi_minim eq "") {$cell5_rssi_minim=$rssi;$cell5_rssi_maxim=$rssi}
- if ($cell5_rssi_minim >= $rssi){$cell5_rssi_minim=$rssi}
- if ($rssi >= $cell5_rssi_maxim){$cell5_rssi_maxim=$rssi}
- }
- print OUTPUT "$cell5_date_hour[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/cell6.txt";
- for ($i = 0; $cell6_date_hour[$i]; ++$i){
- $down_auto=$cell6_down_auto[$i]/90;
- $down_man=$cell6_down_man[$i]/90;
- $abs_drops=$cell6_system_release[$i];
- $traffic=$cell6_system_release[$i]+$cell6_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- if ($cell6_sample_ul_rssi[$i]){
- $rssi=(($cell6_sum_ul_rssi[$i]/$cell6_sample_ul_rssi[$i])/10)-112;
- }
- else{
- $rssi="";
- }
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $cell6_down_auto_total=$cell6_down_auto_total+$down_auto;
- $cell6_down_man_total=$cell6_down_man_total+$down_man;
- $cell6_system_release_total=$cell6_system_release_total+$abs_drops;
- $cell6_traffic_total=$cell6_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($cell6_rssi_minim eq "") {$cell6_rssi_minim=$rssi;$cell6_rssi_maxim=$rssi}
- if ($cell6_rssi_minim >= $rssi){$cell6_rssi_minim=$rssi}
- if ($rssi >= $cell6_rssi_maxim){$cell6_rssi_maxim=$rssi}
- }
- print OUTPUT "$cell6_date_hour[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/cell7.txt";
- for ($i = 0; $cell7_date_hour[$i]; ++$i){
- $down_auto=$cell7_down_auto[$i]/90;
- $down_man=$cell7_down_man[$i]/90;
- $abs_drops=$cell7_system_release[$i];
- $traffic=$cell7_system_release[$i]+$cell7_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- if ($cell7_sample_ul_rssi[$i]){
- $rssi=(($cell7_sum_ul_rssi[$i]/$cell7_sample_ul_rssi[$i])/10)-112;
- }
- else{
- $rssi="";
- }
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $cell7_down_auto_total=$cell7_down_auto_total+$down_auto;
- $cell7_down_man_total=$cell7_down_man_total+$down_man;
- $cell7_system_release_total=$cell7_system_release_total+$abs_drops;
- $cell7_traffic_total=$cell7_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($cell7_rssi_minim eq "") {$cell7_rssi_minim=$rssi;$cell7_rssi_maxim=$rssi}
- if ($cell7_rssi_minim >= $rssi){$cell7_rssi_minim=$rssi}
- if ($rssi >= $cell7_rssi_maxim){$cell7_rssi_maxim=$rssi}
- }
- print OUTPUT "$cell7_date_hour[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/cell8.txt";
- for ($i = 0; $cell8_date_hour[$i]; ++$i){
- $down_auto=$cell8_down_auto[$i]/90;
- $down_man=$cell8_down_man[$i]/90;
- $abs_drops=$cell8_system_release[$i];
- $traffic=$cell8_system_release[$i]+$cell8_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- if ($cell8_sample_ul_rssi[$i]){
- $rssi=(($cell8_sum_ul_rssi[$i]/$cell8_sample_ul_rssi[$i])/10)-112;
- }
- else{
- $rssi="";
- }
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $cell8_down_auto_total=$cell8_down_auto_total+$down_auto;
- $cell8_down_man_total=$cell8_down_man_total+$down_man;
- $cell8_system_release_total=$cell8_system_release_total+$abs_drops;
- $cell8_traffic_total=$cell8_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($cell8_rssi_minim eq "") {$cell8_rssi_minim=$rssi;$cell8_rssi_maxim=$rssi}
- if ($cell8_rssi_minim >= $rssi){$cell8_rssi_minim=$rssi}
- if ($rssi >= $cell8_rssi_maxim){$cell8_rssi_maxim=$rssi}
- }
- print OUTPUT "$cell8_date_hour[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/cell9.txt";
- for ($i = 0; $cell9_date_hour[$i]; ++$i){
- $down_auto=$cell9_down_auto[$i]/90;
- $down_man=$cell9_down_man[$i]/90;
- $abs_drops=$cell9_system_release[$i];
- $traffic=$cell9_system_release[$i]+$cell9_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- if ($cell9_sample_ul_rssi[$i]){
- $rssi=(($cell9_sum_ul_rssi[$i]/$cell9_sample_ul_rssi[$i])/10)-112;
- }
- else{
- $rssi="";
- }
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $cell9_down_auto_total=$cell9_down_auto_total+$down_auto;
- $cell9_down_man_total=$cell9_down_man_total+$down_man;
- $cell9_system_release_total=$cell9_system_release_total+$abs_drops;
- $cell9_traffic_total=$cell9_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($cell9_rssi_minim eq "") {$cell9_rssi_minim=$rssi;$cell9_rssi_maxim=$rssi}
- if ($cell9_rssi_minim >= $rssi){$cell9_rssi_minim=$rssi}
- if ($rssi >= $cell9_rssi_maxim){$cell9_rssi_maxim=$rssi}
- }
- print OUTPUT "$cell9_date_hour[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/sector1.txt";
- if ($cell1_date_hour[0]){@array_loop=@cell1_date_hour}
- elsif ($cell4_date_hour[0]){@array_loop=@cell4_date_hour}
- elsif ($cell7_date_hour[0]){@array_loop=@cell7_date_hour}
- else {@array_loop=''}
- for ($i = 0; $array_loop[$i]; ++$i){
- $cell_sector=0;
- if($cell1_date_hour[$i]){++$cell_sector}
- if($cell4_date_hour[$i]){++$cell_sector}
- if($cell7_date_hour[$i]){++$cell_sector}
- $down_auto=($cell1_down_auto[$i]+$cell4_down_auto[$i]+$cell7_down_auto[$i])/(90*$cell_sector);
- $down_man=($cell1_down_man[$i]+$cell4_down_man[$i]+$cell7_down_man[$i])/(90*$cell_sector);
- $abs_drops=$cell1_system_release[$i]+$cell4_system_release[$i]+$cell7_system_release[$i];
- $traffic=$cell1_system_release[$i]+$cell4_system_release[$i]+$cell7_system_release[$i]+$cell1_normal_release[$i]+$cell4_normal_release[$i]+$cell7_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- $cell_sector=0;
- $rssi1=0;
- $rssi4=0;
- $rssi7=0;
- if ($cell1_sample_ul_rssi[$i]){$rssi1=(($cell1_sum_ul_rssi[$i]/$cell1_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell4_sample_ul_rssi[$i]){$rssi4=(($cell4_sum_ul_rssi[$i]/$cell4_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell7_sample_ul_rssi[$i]){$rssi7=(($cell7_sum_ul_rssi[$i]/$cell7_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell_sector) {$rssi=($rssi1+$rssi4+$rssi7)/$cell_sector}
- else {$rssi=""}
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $sector1_down_auto_total=$sector1_down_auto_total+$down_auto;
- $sector1_down_man_total=$sector1_down_man_total+$down_man;
- $sector1_system_release_total=$sector1_system_release_total+$abs_drops;
- $sector1_traffic_total=$sector1_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($sector1_rssi_minim eq "") {$sector1_rssi_minim=$rssi;$sector1_rssi_maxim=$rssi}
- if ($sector1_rssi_minim >= $rssi){$sector1_rssi_minim=$rssi}
- if ($rssi >= $sector1_rssi_maxim){$sector1_rssi_maxim=$rssi}
- }
- print OUTPUT "$array_loop[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/sector2.txt";
- if ($cell2_date_hour[0]){@array_loop=@cell2_date_hour}
- elsif ($cell5_date_hour[0]){@array_loop=@cell5_date_hour}
- elsif ($cell8_date_hour[0]){@array_loop=@cell8_date_hour}
- else {@array_loop=''}
- for ($i = 0; $array_loop[$i]; ++$i){
- $cell_sector=0;
- if($cell2_date_hour[$i]){++$cell_sector}
- if($cell5_date_hour[$i]){++$cell_sector}
- if($cell8_date_hour[$i]){++$cell_sector}
- $down_auto=($cell2_down_auto[$i]+$cell5_down_auto[$i]+$cell8_down_auto[$i])/(90*$cell_sector);
- $down_man=($cell2_down_man[$i]+$cell5_down_man[$i]+$cell8_down_man[$i])/(90*$cell_sector);
- $abs_drops=$cell2_system_release[$i]+$cell5_system_release[$i]+$cell8_system_release[$i];
- $traffic=$cell2_system_release[$i]+$cell5_system_release[$i]+$cell8_system_release[$i]+$cell2_normal_release[$i]+$cell5_normal_release[$i]+$cell8_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- $cell_sector=0;
- $rssi2=0;
- $rssi5=0;
- $rssi8=0;
- if ($cell2_sample_ul_rssi[$i]){$rssi2=(($cell2_sum_ul_rssi[$i]/$cell2_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell5_sample_ul_rssi[$i]){$rssi5=(($cell5_sum_ul_rssi[$i]/$cell5_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell8_sample_ul_rssi[$i]){$rssi8=(($cell8_sum_ul_rssi[$i]/$cell8_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell_sector) {$rssi=($rssi2+$rssi5+$rssi8)/$cell_sector}
- else {$rssi=""}
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $sector2_down_auto_total=$sector2_down_auto_total+$down_auto;
- $sector2_down_man_total=$sector2_down_man_total+$down_man;
- $sector2_system_release_total=$sector2_system_release_total+$abs_drops;
- $sector2_traffic_total=$sector2_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($sector2_rssi_minim eq "") {$sector2_rssi_minim=$rssi;$sector2_rssi_maxim=$rssi}
- if ($sector2_rssi_minim >= $rssi){$sector2_rssi_minim=$rssi}
- if ($rssi >= $sector2_rssi_maxim){$sector2_rssi_maxim=$rssi}
- }
- print OUTPUT "$array_loop[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/sector3.txt";
- if ($cell3_date_hour[0]){@array_loop=@cell3_date_hour}
- elsif ($cell6_date_hour[0]){@array_loop=@cell6_date_hour}
- elsif ($cell9_date_hour[0]){@array_loop=@cell9_date_hour}
- else {@array_loop=''}
- for ($i = 0; $array_loop[$i]; ++$i){
- $cell_sector=0;
- if($cell3_date_hour[$i]){++$cell_sector}
- if($cell6_date_hour[$i]){++$cell_sector}
- if($cell9_date_hour[$i]){++$cell_sector}
- $down_auto=($cell3_down_auto[$i]+$cell6_down_auto[$i]+$cell9_down_auto[$i])/(90*$cell_sector);
- $down_man=($cell3_down_man[$i]+$cell6_down_man[$i]+$cell9_down_man[$i])/(90*$cell_sector);
- $abs_drops=$cell3_system_release[$i]+$cell6_system_release[$i]+$cell9_system_release[$i];
- $traffic=$cell3_system_release[$i]+$cell6_system_release[$i]+$cell9_system_release[$i]+$cell3_normal_release[$i]+$cell6_normal_release[$i]+$cell9_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- $cell_sector=0;
- $rssi3=0;
- $rssi6=0;
- $rssi9=0;
- if ($cell3_sample_ul_rssi[$i]){$rssi3=(($cell3_sum_ul_rssi[$i]/$cell3_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell6_sample_ul_rssi[$i]){$rssi6=(($cell6_sum_ul_rssi[$i]/$cell6_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell9_sample_ul_rssi[$i]){$rssi9=(($cell9_sum_ul_rssi[$i]/$cell9_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell_sector) {$rssi=($rssi3+$rssi6+$rssi9)/$cell_sector}
- else {$rssi=""}
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $sector3_down_auto_total=$sector3_down_auto_total+$down_auto;
- $sector3_down_man_total=$sector3_down_man_total+$down_man;
- $sector3_system_release_total=$sector3_system_release_total+$abs_drops;
- $sector3_traffic_total=$sector3_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($sector3_rssi_minim eq "") {$sector3_rssi_minim=$rssi;$sector3_rssi_maxim=$rssi}
- if ($sector3_rssi_minim >= $rssi){$sector3_rssi_minim=$rssi}
- if ($rssi >= $sector3_rssi_maxim){$sector3_rssi_maxim=$rssi}
- }
- print OUTPUT "$array_loop[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/layer1.txt";
- if ($cell1_date_hour[0]){@array_loop=@cell1_date_hour}
- elsif ($cell2_date_hour[0]){@array_loop=@cell2_date_hour}
- elsif ($cell3_date_hour[0]){@array_loop=@cell3_date_hour}
- else {@array_loop=''}
- for ($i = 0; $array_loop[$i]; ++$i){
- $cell_sector=0;
- if($cell1_date_hour[$i]){++$cell_sector}
- if($cell2_date_hour[$i]){++$cell_sector}
- if($cell3_date_hour[$i]){++$cell_sector}
- $down_auto=($cell1_down_auto[$i]+$cell2_down_auto[$i]+$cell3_down_auto[$i])/(90*$cell_sector);
- $down_man=($cell1_down_man[$i]+$cell2_down_man[$i]+$cell3_down_man[$i])/(90*$cell_sector);
- $abs_drops=$cell1_system_release[$i]+$cell2_system_release[$i]+$cell3_system_release[$i];
- $traffic=$cell1_system_release[$i]+$cell2_system_release[$i]+$cell3_system_release[$i]+$cell1_normal_release[$i]+$cell2_normal_release[$i]+$cell3_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- $cell_sector=0;
- $rssi1=0;
- $rssi2=0;
- $rssi3=0;
- if ($cell1_sample_ul_rssi[$i]){$rssi1=(($cell1_sum_ul_rssi[$i]/$cell1_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell2_sample_ul_rssi[$i]){$rssi2=(($cell2_sum_ul_rssi[$i]/$cell2_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell3_sample_ul_rssi[$i]){$rssi3=(($cell3_sum_ul_rssi[$i]/$cell3_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell_sector) {$rssi=($rssi1+$rssi2+$rssi3)/$cell_sector}
- else {$rssi=""}
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $layer1_down_auto_total=$layer1_down_auto_total+$down_auto;
- $layer1_down_man_total=$layer1_down_man_total+$down_man;
- $layer1_system_release_total=$layer1_system_release_total+$abs_drops;
- $layer1_traffic_total=$layer1_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($layer1_rssi_minim eq "") {$layer1_rssi_minim=$rssi;$layer1_rssi_maxim=$rssi}
- if ($layer1_rssi_minim >= $rssi){$layer1_rssi_minim=$rssi}
- if ($rssi >= $layer1_rssi_maxim){$layer1_rssi_maxim=$rssi}
- }
- print OUTPUT "$array_loop[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/layer2.txt";
- if ($cell4_date_hour[0]){@array_loop=@cell4_date_hour}
- elsif ($cell5_date_hour[0]){@array_loop=@cell5_date_hour}
- elsif ($cell6_date_hour[0]){@array_loop=@cell6_date_hour}
- else {@array_loop=''}
- for ($i = 0; $array_loop[$i]; ++$i){
- $cell_sector=0;
- if($cell4_date_hour[$i]){++$cell_sector}
- if($cell5_date_hour[$i]){++$cell_sector}
- if($cell6_date_hour[$i]){++$cell_sector}
- $down_auto=($cell4_down_auto[$i]+$cell5_down_auto[$i]+$cell6_down_auto[$i])/(90*$cell_sector);
- $down_man=($cell4_down_man[$i]+$cell5_down_man[$i]+$cell6_down_man[$i])/(90*$cell_sector);
- $abs_drops=$cell4_system_release[$i]+$cell5_system_release[$i]+$cell6_system_release[$i];
- $traffic=$cell4_system_release[$i]+$cell5_system_release[$i]+$cell6_system_release[$i]+$cell4_normal_release[$i]+$cell5_normal_release[$i]+$cell6_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- $cell_sector=0;
- $rssi4=0;
- $rssi5=0;
- $rssi6=0;
- if ($cell4_sample_ul_rssi[$i]){$rssi4=(($cell4_sum_ul_rssi[$i]/$cell4_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell5_sample_ul_rssi[$i]){$rssi5=(($cell5_sum_ul_rssi[$i]/$cell5_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell6_sample_ul_rssi[$i]){$rssi6=(($cell6_sum_ul_rssi[$i]/$cell6_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell_sector) {$rssi=($rssi4+$rssi5+$rssi6)/$cell_sector}
- else {$rssi=""}
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $layer2_down_auto_total=$layer2_down_auto_total+$down_auto;
- $layer2_down_man_total=$layer2_down_man_total+$down_man;
- $layer2_system_release_total=$layer2_system_release_total+$abs_drops;
- $layer2_traffic_total=$layer2_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($layer2_rssi_minim eq "") {$layer2_rssi_minim=$rssi;$layer2_rssi_maxim=$rssi}
- if ($layer2_rssi_minim >= $rssi){$layer2_rssi_minim=$rssi}
- if ($rssi >= $layer2_rssi_maxim){$layer2_rssi_maxim=$rssi}
- }
- print OUTPUT "$array_loop[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/layer3.txt";
- if ($cell7_date_hour[0]){@array_loop=@cell7_date_hour}
- elsif ($cell8_date_hour[0]){@array_loop=@cell8_date_hour}
- elsif ($cell9_date_hour[0]){@array_loop=@cell9_date_hour}
- else {@array_loop=''}
- for ($i = 0; $array_loop[$i]; ++$i){
- $cell_sector=0;
- if($cell7_date_hour[$i]){++$cell_sector}
- if($cell8_date_hour[$i]){++$cell_sector}
- if($cell9_date_hour[$i]){++$cell_sector}
- $down_auto=($cell7_down_auto[$i]+$cell8_down_auto[$i]+$cell9_down_auto[$i])/(90*$cell_sector);
- $down_man=($cell7_down_man[$i]+$cell8_down_man[$i]+$cell9_down_man[$i])/(90*$cell_sector);
- $abs_drops=$cell7_system_release[$i]+$cell8_system_release[$i]+$cell9_system_release[$i];
- $traffic=$cell7_system_release[$i]+$cell8_system_release[$i]+$cell9_system_release[$i]+$cell7_normal_release[$i]+$cell8_normal_release[$i]+$cell9_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- $cell_sector=0;
- $rssi7=0;
- $rssi8=0;
- $rssi9=0;
- if ($cell7_sample_ul_rssi[$i]){$rssi7=(($cell7_sum_ul_rssi[$i]/$cell7_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell8_sample_ul_rssi[$i]){$rssi8=(($cell8_sum_ul_rssi[$i]/$cell8_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell9_sample_ul_rssi[$i]){$rssi9=(($cell9_sum_ul_rssi[$i]/$cell9_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell_sector) {$rssi=($rssi7+$rssi8+$rssi9)/$cell_sector}
- else {$rssi=""}
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $layer3_down_auto_total=$layer3_down_auto_total+$down_auto;
- $layer3_down_man_total=$layer3_down_man_total+$down_man;
- $layer3_system_release_total=$layer3_system_release_total+$abs_drops;
- $layer3_traffic_total=$layer3_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($layer3_rssi_minim eq "") {$layer3_rssi_minim=$rssi;$layer3_rssi_maxim=$rssi}
- if ($layer3_rssi_minim >= $rssi){$layer3_rssi_minim=$rssi}
- if ($rssi >= $layer3_rssi_maxim){$layer3_rssi_maxim=$rssi}
- }
- print OUTPUT "$array_loop[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- open OUTPUT, ">./$nume_director/site.txt";
- if ($cell1_date_hour[0]){@array_loop=@cell1_date_hour}
- elsif ($cell2_date_hour[0]){@array_loop=@cell2_date_hour}
- elsif ($cell3_date_hour[0]){@array_loop=@cell3_date_hour}
- elsif ($cell4_date_hour[0]){@array_loop=@cell4_date_hour}
- elsif ($cell5_date_hour[0]){@array_loop=@cell5_date_hour}
- elsif ($cell6_date_hour[0]){@array_loop=@cell6_date_hour}
- elsif ($cell7_date_hour[0]){@array_loop=@cell7_date_hour}
- elsif ($cell8_date_hour[0]){@array_loop=@cell8_date_hour}
- elsif ($cell9_date_hour[0]){@array_loop=@cell9_date_hour}
- else {@array_loop=''}
- for ($i = 0; $array_loop[$i]; ++$i){
- $cell_sector=0;
- if($cell1_date_hour[$i]){++$cell_sector}
- if($cell2_date_hour[$i]){++$cell_sector}
- if($cell3_date_hour[$i]){++$cell_sector}
- if($cell4_date_hour[$i]){++$cell_sector}
- if($cell5_date_hour[$i]){++$cell_sector}
- if($cell6_date_hour[$i]){++$cell_sector}
- if($cell7_date_hour[$i]){++$cell_sector}
- if($cell8_date_hour[$i]){++$cell_sector}
- if($cell9_date_hour[$i]){++$cell_sector}
- $down_auto=($cell1_down_auto[$i]+$cell2_down_auto[$i]+$cell3_down_auto[$i]+$cell4_down_auto[$i]+$cell5_down_auto[$i]+$cell6_down_auto[$i]+$cell7_down_auto[$i]+$cell8_down_auto[$i]+$cell9_down_auto[$i])/(90*$cell_sector);
- $down_man=($cell1_down_man[$i]+$cell2_down_man[$i]+$cell3_down_man[$i]+$cell4_down_man[$i]+$cell5_down_man[$i]+$cell6_down_man[$i]+$cell7_down_man[$i]+$cell8_down_man[$i]+$cell9_down_man[$i])/(90*$cell_sector);
- $abs_drops=$cell1_system_release[$i]+$cell2_system_release[$i]+$cell3_system_release[$i]+$cell4_system_release[$i]+$cell5_system_release[$i]+$cell6_system_release[$i]+$cell7_system_release[$i]+$cell8_system_release[$i]+$cell9_system_release[$i];
- $traffic=$cell1_system_release[$i]+$cell2_system_release[$i]+$cell3_system_release[$i]+$cell4_system_release[$i]+$cell5_system_release[$i]+$cell6_system_release[$i]+$cell7_system_release[$i]+$cell8_system_release[$i]+$cell9_system_release[$i]+$cell1_normal_release[$i]+$cell2_normal_release[$i]+$cell3_normal_release[$i]+$cell4_normal_release[$i]+$cell5_normal_release[$i]+$cell6_normal_release[$i]+$cell7_normal_release[$i]+$cell8_normal_release[$i]+$cell9_normal_release[$i];
- $down_auto = int(($down_auto)*100+0.5)/100;
- $down_man = int(($down_man)*100+0.5)/100;
- $cell_sector=0;
- $rssi1=0;
- $rssi2=0;
- $rssi3=0;
- $rssi4=0;
- $rssi5=0;
- $rssi6=0;
- $rssi7=0;
- $rssi8=0;
- $rssi9=0;
- if ($cell1_sample_ul_rssi[$i]){$rssi1=(($cell1_sum_ul_rssi[$i]/$cell1_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell2_sample_ul_rssi[$i]){$rssi2=(($cell2_sum_ul_rssi[$i]/$cell2_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell3_sample_ul_rssi[$i]){$rssi3=(($cell3_sum_ul_rssi[$i]/$cell3_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell4_sample_ul_rssi[$i]){$rssi4=(($cell4_sum_ul_rssi[$i]/$cell4_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell5_sample_ul_rssi[$i]){$rssi5=(($cell5_sum_ul_rssi[$i]/$cell5_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell6_sample_ul_rssi[$i]){$rssi6=(($cell6_sum_ul_rssi[$i]/$cell6_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell7_sample_ul_rssi[$i]){$rssi7=(($cell7_sum_ul_rssi[$i]/$cell7_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell8_sample_ul_rssi[$i]){$rssi8=(($cell8_sum_ul_rssi[$i]/$cell8_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell9_sample_ul_rssi[$i]){$rssi9=(($cell9_sum_ul_rssi[$i]/$cell9_sample_ul_rssi[$i])/10)-112; ++$cell_sector}
- if ($cell_sector) {$rssi=($rssi1+$rssi2+$rssi3+$rssi4+$rssi5+$rssi6+$rssi7+$rssi8+$rssi9)/$cell_sector}
- else {$rssi=""}
- if($rssi){$rssi=int($rssi*100-0.5)/100;}
- $site_down_auto_total=$site_down_auto_total+$down_auto;
- $site_down_man_total=$site_down_man_total+$down_man;
- $site_system_release_total=$site_system_release_total+$abs_drops;
- $site_traffic_total=$site_traffic_total+$traffic;
- if ($rssi ne ""){
- if ($site_rssi_minim eq "") {$site_rssi_minim=$rssi;$site_rssi_maxim=$rssi}
- if ($site_rssi_minim >= $rssi){$site_rssi_minim=$rssi}
- if ($rssi >= $site_rssi_maxim){$site_rssi_maxim=$rssi}
- }
- print OUTPUT "$array_loop[$i],$abs_drops,$down_auto,$down_man,$rssi,$traffic\n";
- }
- close OUTPUT;
- if ($site_traffic_total) {$site_drops_relativ = (int(($site_system_release_total/$site_traffic_total)*10000+0.5)/100)."%"}
- if ($layer1_traffic_total) {$layer1_drops_relativ = (int(($layer1_system_release_total/$layer1_traffic_total)*10000+0.5)/100)."%"}
- if ($layer2_traffic_total) {$layer2_drops_relativ = (int(($layer2_system_release_total/$layer2_traffic_total)*10000+0.5)/100)."%"}
- if ($layer3_traffic_total) {$layer3_drops_relativ = (int(($layer3_system_release_total/$layer3_traffic_total)*10000+0.5)/100)."%"}
- if ($sector1_traffic_total) {$sector1_drops_relativ = (int(($sector1_system_release_total/$sector1_traffic_total)*10000+0.5)/100)."%"}
- if ($sector2_traffic_total) {$sector2_drops_relativ = (int(($sector2_system_release_total/$sector2_traffic_total)*10000+0.5)/100)."%"}
- if ($sector3_traffic_total) {$sector3_drops_relativ = (int(($sector3_system_release_total/$sector3_traffic_total)*10000+0.5)/100)."%"}
- if ($cell1_traffic_total) {$cell1_drops_relativ = (int(($cell1_system_release_total/$cell1_traffic_total)*10000+0.5)/100)."%"}
- if ($cell2_traffic_total) {$cell2_drops_relativ = (int(($cell2_system_release_total/$cell2_traffic_total)*10000+0.5)/100)."%"}
- if ($cell3_traffic_total) {$cell3_drops_relativ = (int(($cell3_system_release_total/$cell3_traffic_total)*10000+0.5)/100)."%"}
- if ($cell4_traffic_total) {$cell4_drops_relativ = (int(($cell4_system_release_total/$cell4_traffic_total)*10000+0.5)/100)."%"}
- if ($cell5_traffic_total) {$cell5_drops_relativ = (int(($cell5_system_release_total/$cell5_traffic_total)*10000+0.5)/100)."%"}
- if ($cell6_traffic_total) {$cell6_drops_relativ = (int(($cell6_system_release_total/$cell6_traffic_total)*10000+0.5)/100)."%"}
- if ($cell7_traffic_total) {$cell7_drops_relativ = (int(($cell7_system_release_total/$cell7_traffic_total)*10000+0.5)/100)."%"}
- if ($cell8_traffic_total) {$cell8_drops_relativ = (int(($cell8_system_release_total/$cell8_traffic_total)*10000+0.5)/100)."%"}
- if ($cell9_traffic_total) {$cell9_drops_relativ = (int(($cell9_system_release_total/$cell9_traffic_total)*10000+0.5)/100)."%"}
- for ($i = 0; $down_auto_total_praguri[$i]; ++$i){
- if($site_down_auto_total) {if ($site_down_auto_total > $down_auto_total_praguri[$i]) {$site_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($layer1_down_auto_total) {if ($layer1_down_auto_total > $down_auto_total_praguri[$i]) {$layer1_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($layer2_down_auto_total) {if ($layer2_down_auto_total > $down_auto_total_praguri[$i]) {$layer2_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($layer3_down_auto_total) {if ($layer3_down_auto_total > $down_auto_total_praguri[$i]) {$layer3_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($sector1_down_auto_total) {if ($sector1_down_auto_total > $down_auto_total_praguri[$i]) {$sector1_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($sector2_down_auto_total) {if ($sector2_down_auto_total > $down_auto_total_praguri[$i]) {$sector2_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($sector3_down_auto_total) {if ($sector3_down_auto_total > $down_auto_total_praguri[$i]) {$sector3_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($cell1_down_auto_total) {if ($cell1_down_auto_total > $down_auto_total_praguri[$i]) {$cell1_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($cell2_down_auto_total) {if ($cell2_down_auto_total > $down_auto_total_praguri[$i]) {$cell2_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($cell3_down_auto_total) {if ($cell3_down_auto_total > $down_auto_total_praguri[$i]) {$cell3_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($cell4_down_auto_total) {if ($cell4_down_auto_total > $down_auto_total_praguri[$i]) {$cell4_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($cell5_down_auto_total) {if ($cell5_down_auto_total > $down_auto_total_praguri[$i]) {$cell5_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($cell6_down_auto_total) {if ($cell6_down_auto_total > $down_auto_total_praguri[$i]) {$cell6_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($cell7_down_auto_total) {if ($cell7_down_auto_total > $down_auto_total_praguri[$i]) {$cell7_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($cell8_down_auto_total) {if ($cell8_down_auto_total > $down_auto_total_praguri[$i]) {$cell8_down_auto_total_color = $down_auto_total_colors[$i]}}
- if($cell9_down_auto_total) {if ($cell9_down_auto_total > $down_auto_total_praguri[$i]) {$cell9_down_auto_total_color = $down_auto_total_colors[$i]}}
- }
- for ($i = 0; $drops_relativ_praguri[$i]; ++$i){
- if($site_drops_relativ) {if ($site_drops_relativ > $drops_relativ_praguri[$i]) {$site_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($layer1_drops_relativ) {if ($layer1_drops_relativ > $drops_relativ_praguri[$i]) {$layer1_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($layer2_drops_relativ) {if ($layer2_drops_relativ > $drops_relativ_praguri[$i]) {$layer2_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($layer3_drops_relativ) {if ($layer3_drops_relativ > $drops_relativ_praguri[$i]) {$layer3_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($sector1_drops_relativ) {if ($sector1_drops_relativ > $drops_relativ_praguri[$i]) {$sector1_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($sector2_drops_relativ) {if ($sector2_drops_relativ > $drops_relativ_praguri[$i]) {$sector2_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($sector3_drops_relativ) {if ($sector3_drops_relativ > $drops_relativ_praguri[$i]) {$sector3_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($cell1_drops_relativ) {if ($cell1_drops_relativ > $drops_relativ_praguri[$i]) {$cell1_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($cell2_drops_relativ) {if ($cell2_drops_relativ > $drops_relativ_praguri[$i]) {$cell2_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($cell3_drops_relativ) {if ($cell3_drops_relativ > $drops_relativ_praguri[$i]) {$cell3_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($cell4_drops_relativ) {if ($cell4_drops_relativ > $drops_relativ_praguri[$i]) {$cell4_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($cell5_drops_relativ) {if ($cell5_drops_relativ > $drops_relativ_praguri[$i]) {$cell5_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($cell6_drops_relativ) {if ($cell6_drops_relativ > $drops_relativ_praguri[$i]) {$cell6_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($cell7_drops_relativ) {if ($cell7_drops_relativ > $drops_relativ_praguri[$i]) {$cell7_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($cell8_drops_relativ) {if ($cell8_drops_relativ > $drops_relativ_praguri[$i]) {$cell8_drops_relativ_color = $drops_relativ_colors[$i]}}
- if($cell9_drops_relativ) {if ($cell9_drops_relativ > $drops_relativ_praguri[$i]) {$cell9_drops_relativ_color = $drops_relativ_colors[$i]}}
- }
- for ($i = 0; $rssi_minim_praguri[$i]; ++$i){
- if($site_rssi_minim) {if ($site_rssi_minim < $rssi_minim_praguri[$i]) {$site_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($layer1_rssi_minim) {if ($layer1_rssi_minim < $rssi_minim_praguri[$i]) {$layer1_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($layer2_rssi_minim) {if ($layer2_rssi_minim < $rssi_minim_praguri[$i]) {$layer2_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($layer3_rssi_minim) {if ($layer3_rssi_minim < $rssi_minim_praguri[$i]) {$layer3_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($sector1_rssi_minim) {if ($sector1_rssi_minim < $rssi_minim_praguri[$i]) {$sector1_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($sector2_rssi_minim) {if ($sector2_rssi_minim < $rssi_minim_praguri[$i]) {$sector2_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($sector3_rssi_minim) {if ($sector3_rssi_minim < $rssi_minim_praguri[$i]) {$sector3_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($cell1_rssi_minim) {if ($cell1_rssi_minim < $rssi_minim_praguri[$i]) {$cell1_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($cell2_rssi_minim) {if ($cell2_rssi_minim < $rssi_minim_praguri[$i]) {$cell2_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($cell3_rssi_minim) {if ($cell3_rssi_minim < $rssi_minim_praguri[$i]) {$cell3_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($cell4_rssi_minim) {if ($cell4_rssi_minim < $rssi_minim_praguri[$i]) {$cell4_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($cell5_rssi_minim) {if ($cell5_rssi_minim < $rssi_minim_praguri[$i]) {$cell5_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($cell6_rssi_minim) {if ($cell6_rssi_minim < $rssi_minim_praguri[$i]) {$cell6_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($cell7_rssi_minim) {if ($cell7_rssi_minim < $rssi_minim_praguri[$i]) {$cell7_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($cell8_rssi_minim) {if ($cell8_rssi_minim < $rssi_minim_praguri[$i]) {$cell8_rssi_minim_color = $rssi_minim_colors[$i]}}
- if($cell9_rssi_minim) {if ($cell9_rssi_minim < $rssi_minim_praguri[$i]) {$cell9_rssi_minim_color = $rssi_minim_colors[$i]}}
- }
- for ($i = 0; $rssi_maxim_praguri[$i]; ++$i){
- if($site_rssi_maxim) {if ($site_rssi_maxim > $rssi_maxim_praguri[$i]) {$site_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($layer1_rssi_maxim) {if ($layer1_rssi_maxim > $rssi_maxim_praguri[$i]) {$layer1_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($layer2_rssi_maxim) {if ($layer2_rssi_maxim > $rssi_maxim_praguri[$i]) {$layer2_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($layer3_rssi_maxim) {if ($layer3_rssi_maxim > $rssi_maxim_praguri[$i]) {$layer3_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($sector1_rssi_maxim) {if ($sector1_rssi_maxim > $rssi_maxim_praguri[$i]) {$sector1_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($sector2_rssi_maxim) {if ($sector2_rssi_maxim > $rssi_maxim_praguri[$i]) {$sector2_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($sector3_rssi_maxim) {if ($sector3_rssi_maxim > $rssi_maxim_praguri[$i]) {$sector3_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($cell1_rssi_maxim) {if ($cell1_rssi_maxim > $rssi_maxim_praguri[$i]) {$cell1_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($cell2_rssi_maxim) {if ($cell2_rssi_maxim > $rssi_maxim_praguri[$i]) {$cell2_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($cell3_rssi_maxim) {if ($cell3_rssi_maxim > $rssi_maxim_praguri[$i]) {$cell3_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($cell4_rssi_maxim) {if ($cell4_rssi_maxim > $rssi_maxim_praguri[$i]) {$cell4_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($cell5_rssi_maxim) {if ($cell5_rssi_maxim > $rssi_maxim_praguri[$i]) {$cell5_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($cell6_rssi_maxim) {if ($cell6_rssi_maxim > $rssi_maxim_praguri[$i]) {$cell6_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($cell7_rssi_maxim) {if ($cell7_rssi_maxim > $rssi_maxim_praguri[$i]) {$cell7_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($cell8_rssi_maxim) {if ($cell8_rssi_maxim > $rssi_maxim_praguri[$i]) {$cell8_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- if($cell9_rssi_maxim) {if ($cell9_rssi_maxim > $rssi_maxim_praguri[$i]) {$cell9_rssi_maxim_color = $rssi_maxim_colors[$i]}}
- }
- open OUTPUT, ">./$nume_director/raport.html";
- print OUTPUT '
- <br />
- <font size="5" face="Verdana" color="#000000">'."Site $input
- <br />
- ".'
- <font size="3" face="Verdana" color="#000000">'."@raport_from
- ".'
- <br />
- <br />
- <table border="1">
- '."
- <tr>
- <td>
- </td>
- <td>
- Down Auto
- </td>
- <td>
- Down Manual
- </td>
- <td>
- CS Drops
- </td>
- <td>
- All Calls
- </td>
- <td>
- Call Drop Rate
- </td>
- <td>
- RSSI Minim
- </td>
- <td>
- RSSI Maxim
- </td>
- </tr>
- <tr>
- <td>
- Site
- </td>
- <td bgcolor=".'"'."$site_down_auto_total_color".'"'.">
- $site_down_auto_total
- </td>
- <td>
- $site_down_man_total
- </td>
- <td>
- $site_system_release_total
- </td>
- <td>
- $site_traffic_total
- </td>
- <td bgcolor=".'"'."$site_drops_relativ_color".'"'.">
- $site_drops_relativ
- </td>
- <td bgcolor=".'"'."$site_rssi_minim_color".'"'.">
- $site_rssi_minim
- </td>
- <td bgcolor=".'"'."$site_rssi_maxim_color".'"'.">
- $site_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Layer 1
- </td>
- <td bgcolor=".'"'."$layer1_down_auto_total_color".'"'.">
- $layer1_down_auto_total
- </td>
- <td>
- $layer1_down_man_total
- </td>
- <td>
- $layer1_system_release_total
- </td>
- <td>
- $layer1_traffic_total
- </td>
- <td bgcolor=".'"'."$layer1_drops_relativ_color".'"'.">
- $layer1_drops_relativ
- </td>
- <td bgcolor=".'"'."$layer1_rssi_minim_color".'"'.">
- $layer1_rssi_minim
- </td>
- <td bgcolor=".'"'."$layer1_rssi_maxim_color".'"'.">
- $layer1_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Layer 2
- </td>
- <td bgcolor=".'"'."$layer2_down_auto_total_color".'"'.">
- $layer2_down_auto_total
- </td>
- <td>
- $layer2_down_man_total
- </td>
- <td>
- $layer2_system_release_total
- </td>
- <td>
- $layer2_traffic_total
- </td>
- <td bgcolor=".'"'."$layer2_drops_relativ_color".'"'.">
- $layer2_drops_relativ
- </td>
- <td bgcolor=".'"'."$layer2_rssi_minim_color".'"'.">
- $layer2_rssi_minim
- </td>
- <td bgcolor=".'"'."$layer2_rssi_maxim_color".'"'.">
- $layer2_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Layer 3
- </td>
- <td bgcolor=".'"'."$layer3_down_auto_total_color".'"'.">
- $layer3_down_auto_total
- </td>
- <td>
- $layer3_down_man_total
- </td>
- <td>
- $layer3_system_release_total
- </td>
- <td>
- $layer3_traffic_total
- </td>
- <td bgcolor=".'"'."$layer3_drops_relativ_color".'"'.">
- $layer3_drops_relativ
- </td>
- <td bgcolor=".'"'."$layer3_rssi_minim_color".'"'.">
- $layer3_rssi_minim
- </td>
- <td bgcolor=".'"'."$layer3_rssi_maxim_color".'"'.">
- $layer3_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Sector 1
- </td>
- <td bgcolor=".'"'."$sector1_down_auto_total_color".'"'.">
- $sector1_down_auto_total
- </td>
- <td>
- $sector1_down_man_total
- </td>
- <td>
- $sector1_system_release_total
- </td>
- <td>
- $sector1_traffic_total
- </td>
- <td bgcolor=".'"'."$sector1_drops_relativ_color".'"'.">
- $sector1_drops_relativ
- </td>
- <td bgcolor=".'"'."$sector1_rssi_minim_color".'"'.">
- $sector1_rssi_minim
- </td>
- <td bgcolor=".'"'."$sector1_rssi_maxim_color".'"'.">
- $sector1_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Sector 2
- </td>
- <td bgcolor=".'"'."$sector2_down_auto_total_color".'"'.">
- $sector2_down_auto_total
- </td>
- <td>
- $sector2_down_man_total
- </td>
- <td>
- $sector2_system_release_total
- </td>
- <td>
- $sector2_traffic_total
- </td>
- <td bgcolor=".'"'."$sector2_drops_relativ_color".'"'.">
- $sector2_drops_relativ
- </td>
- <td bgcolor=".'"'."$sector2_rssi_minim_color".'"'.">
- $sector2_rssi_minim
- </td>
- <td bgcolor=".'"'."$sector2_rssi_maxim_color".'"'.">
- $sector2_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Sector 3
- </td>
- <td bgcolor=".'"'."$sector3_down_auto_total_color".'"'.">
- $sector3_down_auto_total
- </td>
- <td>
- $sector3_down_man_total
- </td>
- <td>
- $sector3_system_release_total
- </td>
- <td>
- $sector3_traffic_total
- </td>
- <td bgcolor=".'"'."$sector3_drops_relativ_color".'"'.">
- $sector3_drops_relativ
- </td>
- <td bgcolor=".'"'."$sector3_rssi_minim_color".'"'.">
- $sector3_rssi_minim
- </td>
- <td bgcolor=".'"'."$sector3_rssi_maxim_color".'"'.">
- $sector3_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Cell 1
- </td>
- <td bgcolor=".'"'."$cell1_down_auto_total_color".'"'.">
- $cell1_down_auto_total
- </td>
- <td>
- $cell1_down_man_total
- </td>
- <td>
- $cell1_system_release_total
- </td>
- <td>
- $cell1_traffic_total
- </td>
- <td bgcolor=".'"'."$cell1_drops_relativ_color".'"'.">
- $cell1_drops_relativ
- </td>
- <td bgcolor=".'"'."$cell1_rssi_minim_color".'"'.">
- $cell1_rssi_minim
- </td>
- <td bgcolor=".'"'."$cell1_rssi_maxim_color".'"'.">
- $cell1_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Cell 2
- </td>
- <td bgcolor=".'"'."$cell2_down_auto_total_color".'"'.">
- $cell2_down_auto_total
- </td>
- <td>
- $cell2_down_man_total
- </td>
- <td>
- $cell2_system_release_total
- </td>
- <td>
- $cell2_traffic_total
- </td>
- <td bgcolor=".'"'."$cell2_drops_relativ_color".'"'.">
- $cell2_drops_relativ
- </td>
- <td bgcolor=".'"'."$cell2_rssi_minim_color".'"'.">
- $cell2_rssi_minim
- </td>
- <td bgcolor=".'"'."$cell2_rssi_maxim_color".'"'.">
- $cell2_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Cell 3
- </td>
- <td bgcolor=".'"'."$cell3_down_auto_total_color".'"'.">
- $cell3_down_auto_total
- </td>
- <td>
- $cell3_down_man_total
- </td>
- <td>
- $cell3_system_release_total
- </td>
- <td>
- $cell3_traffic_total
- </td>
- <td bgcolor=".'"'."$cell3_drops_relativ_color".'"'.">
- $cell3_drops_relativ
- </td>
- <td bgcolor=".'"'."$cell3_rssi_minim_color".'"'.">
- $cell3_rssi_minim
- </td>
- <td bgcolor=".'"'."$cell3_rssi_maxim_color".'"'.">
- $cell3_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Cell 4
- </td>
- <td bgcolor=".'"'."$cell4_down_auto_total_color".'"'.">
- $cell4_down_auto_total
- </td>
- <td>
- $cell4_down_man_total
- </td>
- <td>
- $cell4_system_release_total
- </td>
- <td>
- $cell4_traffic_total
- </td>
- <td bgcolor=".'"'."$cell4_drops_relativ_color".'"'.">
- $cell4_drops_relativ
- </td>
- <td bgcolor=".'"'."$cell4_rssi_minim_color".'"'.">
- $cell4_rssi_minim
- </td>
- <td bgcolor=".'"'."$cell4_rssi_maxim_color".'"'.">
- $cell4_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Cell 5
- </td>
- <td bgcolor=".'"'."$cell5_down_auto_total_color".'"'.">
- $cell5_down_auto_total
- </td>
- <td>
- $cell5_down_man_total
- </td>
- <td>
- $cell5_system_release_total
- </td>
- <td>
- $cell5_traffic_total
- </td>
- <td bgcolor=".'"'."$cell5_drops_relativ_color".'"'.">
- $cell5_drops_relativ
- </td>
- <td bgcolor=".'"'."$cell5_rssi_minim_color".'"'.">
- $cell5_rssi_minim
- </td>
- <td bgcolor=".'"'."$cell5_rssi_maxim_color".'"'.">
- $cell5_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Cell 6
- </td>
- <td bgcolor=".'"'."$cell6_down_auto_total_color".'"'.">
- $cell6_down_auto_total
- </td>
- <td>
- $cell6_down_man_total
- </td>
- <td>
- $cell6_system_release_total
- </td>
- <td>
- $cell6_traffic_total
- </td>
- <td bgcolor=".'"'."$cell6_drops_relativ_color".'"'.">
- $cell6_drops_relativ
- </td>
- <td bgcolor=".'"'."$cell6_rssi_minim_color".'"'.">
- $cell6_rssi_minim
- </td>
- <td bgcolor=".'"'."$cell6_rssi_maxim_color".'"'.">
- $cell6_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Cell 7
- </td>
- <td bgcolor=".'"'."$cell7_down_auto_total_color".'"'.">
- $cell7_down_auto_total
- </td>
- <td>
- $cell7_down_man_total
- </td>
- <td>
- $cell7_system_release_total
- </td>
- <td>
- $cell7_traffic_total
- </td>
- <td bgcolor=".'"'."$cell7_drops_relativ_color".'"'.">
- $cell7_drops_relativ
- </td>
- <td bgcolor=".'"'."$cell7_rssi_minim_color".'"'.">
- $cell7_rssi_minim
- </td>
- <td bgcolor=".'"'."$cell7_rssi_maxim_color".'"'.">
- $cell7_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Cell 8
- </td>
- <td bgcolor=".'"'."$cell8_down_auto_total_color".'"'.">
- $cell8_down_auto_total
- </td>
- <td>
- $cell8_down_man_total
- </td>
- <td>
- $cell8_system_release_total
- </td>
- <td>
- $cell8_traffic_total
- </td>
- <td bgcolor=".'"'."$cell8_drops_relativ_color".'"'.">
- $cell8_drops_relativ
- </td>
- <td bgcolor=".'"'."$cell8_rssi_minim_color".'"'.">
- $cell8_rssi_minim
- </td>
- <td bgcolor=".'"'."$cell8_rssi_maxim_color".'"'.">
- $cell8_rssi_maxim
- </td>
- </tr>
- <tr>
- <td>
- Cell 9
- </td>
- <td bgcolor=".'"'."$cell9_down_auto_total_color".'"'.">
- $cell9_down_auto_total
- </td>
- <td>
- $cell9_down_man_total
- </td>
- <td>
- $cell9_system_release_total
- </td>
- <td>
- $cell9_traffic_total
- </td>
- <td bgcolor=".'"'."$cell9_drops_relativ_color".'"'.">
- $cell9_drops_relativ
- </td>
- <td bgcolor=".'"'."$cell9_rssi_minim_color".'"'.">
- $cell9_rssi_minim
- </td>
- <td bgcolor=".'"'."$cell9_rssi_maxim_color".'"'.">
- $cell9_rssi_maxim
- </td>
- </tr>
- </table>
- </font>
- ".'
- <html>
- <head>
- <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
- <title>Auto-resizing chart</title>
- </head>
- <body>
- <!-- saved from url=(0013)about:internet -->
- <!-- amline script-->
- <script type="text/javascript" src="../settings/amline/swfobject.js"></script>
- <table border="1" width="100%">
- <tr>
- <td>
- <div id="flashcontent1">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/site.xml"));
- so.addVariable("data_file", encodeURIComponent("site.txt"));
- so.write("flashcontent1");
- // ]]>
- </script>
- </td>
- <td>
- <div id="flashcontent2">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/layer1.xml"));
- so.addVariable("data_file", encodeURIComponent("layer1.txt"));
- so.write("flashcontent2");
- // ]]>
- </script>
- </td>
- </tr>
- <tr>
- <td>
- <div id="flashcontent3">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/layer2.xml"));
- so.addVariable("data_file", encodeURIComponent("layer2.txt"));
- so.write("flashcontent3");
- // ]]>
- </script>
- </td>
- <td>
- <div id="flashcontent4">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/layer3.xml"));
- so.addVariable("data_file", encodeURIComponent("layer3.txt"));
- so.write("flashcontent4");
- // ]]>
- </script>
- </td>
- </tr>
- <tr>
- <td>
- <div id="flashcontent5">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/sector1.xml"));
- so.addVariable("data_file", encodeURIComponent("sector1.txt"));
- so.write("flashcontent5");
- // ]]>
- </script>
- </td>
- <td>
- <div id="flashcontent6">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/sector2.xml"));
- so.addVariable("data_file", encodeURIComponent("sector2.txt"));
- so.write("flashcontent6");
- // ]]>
- </script>
- </td>
- </tr>
- <tr>
- <td>
- <div id="flashcontent7">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/sector3.xml"));
- so.addVariable("data_file", encodeURIComponent("sector3.txt"));
- so.write("flashcontent7");
- // ]]>
- </script>
- </td>
- <td>
- <div id="flashcontent8">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/cell1.xml"));
- so.addVariable("data_file", encodeURIComponent("cell1.txt"));
- so.write("flashcontent8");
- // ]]>
- </script>
- </td>
- </tr>
- <tr>
- <td>
- <div id="flashcontent9">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/cell2.xml"));
- so.addVariable("data_file", encodeURIComponent("cell2.txt"));
- so.write("flashcontent9");
- // ]]>
- </script>
- </td>
- <td>
- <div id="flashcontent10">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/cell3.xml"));
- so.addVariable("data_file", encodeURIComponent("cell3.txt"));
- so.write("flashcontent10");
- // ]]>
- </script>
- </td>
- </tr>
- <tr>
- <td>
- <div id="flashcontent11">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/cell4.xml"));
- so.addVariable("data_file", encodeURIComponent("cell4.txt"));
- so.write("flashcontent11");
- // ]]>
- </script>
- </td>
- <td>
- <div id="flashcontent12">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/cell5.xml"));
- so.addVariable("data_file", encodeURIComponent("cell5.txt"));
- so.write("flashcontent12");
- // ]]>
- </script>
- </td>
- </tr>
- <tr>
- <td>
- <div id="flashcontent13">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/cell6.xml"));
- so.addVariable("data_file", encodeURIComponent("cell6.txt"));
- so.write("flashcontent13");
- // ]]>
- </script>
- </td>
- <td>
- <div id="flashcontent14">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/cell7.xml"));
- so.addVariable("data_file", encodeURIComponent("cell7.txt"));
- so.write("flashcontent14");
- // ]]>
- </script>
- </td>
- </tr>
- <tr>
- <td>
- <div id="flashcontent15">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/cell8.xml"));
- so.addVariable("data_file", encodeURIComponent("cell8.txt"));
- so.write("flashcontent15");
- // ]]>
- </script>
- </td>
- <td>
- <div id="flashcontent16">
- <strong>You need to upgrade your Flash Player</strong>
- </div>
- <script type="text/javascript">
- // <![CDATA[
- var so = new SWFObject("../settings/amline/amline.swf", "amline", "100%", "500", "8", "#FFFFFF");
- so.addVariable("path", "../settings/amline/");
- so.addVariable("settings_file", encodeURIComponent("../settings/cell9.xml"));
- so.addVariable("data_file", encodeURIComponent("cell9.txt"));
- so.write("flashcontent16");
- // ]]>
- </script>
- </td>
- </tr>
- </table>
- <!-- end of amline script -->
- </body>
- </html>
- ';
- close OUTPUT;
- open OUTPUT, ">./$nume_director/printout.txt";
- print OUTPUT $printout;
- close OUTPUT;
Add Comment
Please, Sign In to add comment