Help for this page
opendir(SPR , "/apps/inst1/metrica/TechnologyPacks/ON-SITE/Nokia_S11.5 +/reportspr/") or die "$!"; while ( defined ( $file_name = readdir(SPR) ) ) { ... } print Dumper [ %spr_hash ];
$VAR1 = [ 'rep_vnz_gprs_performance_report_daily_spr.sql', ... [], 'rep_vnz_gprs_perf_report_daily_enhanced_spr.sql', [],