""6357445" "1349947" "0" "1" "3" "2" "1" "1" "1" "1" "-2" "1394531830" "1394531830" "1415599200" "0" "0" "0" "0" "196" "29240" "378" "1394531846" "0" "0" "0" "8201" "0" "64" "0" "2" "89799" "8201" "89805" "-1" "-1" "Local Cell id=2, Cell Name=21842C11" "0" "1394531057" "1394531057" "1415599200" "1394531092" "" "0" "RAT_INFO=GL, AFFECTED_RAT=L" "" ""
"10.35.201.146" "195;" "0" "5705354" "0" "" "" "0" "0" "Cell""
####
my $file = `filename`;
chomp($file);
open(my $data, '<', $file) or die "Couldn't open '$file'\n ";
while (my $line = <$data>){
$line =~ s/\s+/ /g ;
$line =~ s/\" \"/\"\"/g ;
$line =~ s/\n+//g ;
$line =~ s/\s+$//;
if ($line !~ /select/ && $line !~ /spool/ && $line !~ /\|\|/ ){
my @array = $line;
my $result;
for (@array){
chomp;
$result .= $_ . " ";
}
$result =~ s/\s+//g;
print "$result\n";
####
""6357445""1349947""0""1""3""2""1""1""1""1""-2""1394531830""1394531830""1415599200""0""0""0""0""196""29240""378""1394531846""0""0""0""8201""0""64""0""2""89799""8201""89805""-1""-1""LocalCellid=2,CellName=21842C11""0""1394531057""1394531057""1415599200""1394531092""""0""RAT_INFO=GL,AFFECTED_RAT=L"""""
"10.35.201.146""195;""0""5705354""0""""""0""0""Cell""