-rw-r--r--. 1 mala mala 21M Mar 23 2015 SGSN225374.1.201412260345.206040
-rw-r--r--. 1 mala mala 21M Mar 23 2015 SGSN225374.1.201412260345.206059
-rw-r--r--. 1 mala mala 21M Mar 23 2015 SGSN225374.1.201412260345.818393
-rw-r--r--. 1 mala mala 21M Mar 23 2015 SGSN225374.1.201412260345.818410
-rw-r--r--. 1 mala mala 19M Mar 23 2015 SGSN225374.1.201412260345.818411
####
FAIL_IN_RAU_MME_TO_2GSGSN,0;
4,12017,184,10373,405,25,100,0,0,0,5,0,25,64000,64000,
INT_ID,88320,
PERIOD_START_TIME,20141226034500,
PERIOD_STOP_TIME,20141226040003,
PERIOD_DURATION,15,
PAPU_INDEX,4,
LAC,12017,
RAC,184,
CI,10373,
SUCC_GPRS_ATTACH,1,
FAIL_GPRS_ATTACH,0,
SUCC_COMBINED_ATTACH,0,
FAIL_COMBINED_ATTACH,0,
SUCC_IMSI_ATTACH,0,
FAIL_IMSI_ATTACH,0,
GENERAL_UNDEF_ATTACH_FAILURE,0,
SUCC_INTRA_PAPU_RA_UPDAT,0,
FAIL_INTRA_PAPU_RA_UPDAT,0,
SUCC_INTRA_PAPU_RA_LA_UPDAT,0,
FAIL_INTRA_PAPU_RA_LA_UPDAT,0,
SUCC_INTRA_PAPU_RA_UPDAT_IMSI,0,
.
.
.
.
FAIL_IN_RAU_MME_TO_2GSGSN,0;
4,12017,184,10383,405,25,100,0,0,0,5,0,25,64000,64000,
####
$cmp=substr(reverse($line),0,1);
if ($cmp eq ";")
{
####
Output:
perl generate_nsn_sgsn_report.pl 20141226
Memory Usage : 77.70% #at the starting stage the usage of RAM
120
120
120
120
120
120
120
120
120
120
Rac Val :120
120
120
120
Memory Usage : 77.70% #Checking the ram usage after opening every file
Memory Usage : 77.71%
Memory Usage : 77.71%
Memory Usage : 77.72%
Memory Usage : 77.75%
%val :120
%seen_cdr :212
%seen_var :4152
%pap_data :1858
%mcc_data :629
%mnc_data :1085
%sgsn_val :102895
%sgsn_name :102893
%pap_val :699127
%mcc_val :231276
%rac_val :4465260
%nsei_data :120
%nsvci_data :120
%nsvc_val :120
the code took:49 wallclock secs (48.76 usr 0.06 sys + 0.01 cusr 0.02 csys = 48.85 CPU)