#!/usr/bin/perl -w

use strict;

my $line = 'DsGccProxy.dll|AlarmForwarderServer.exe,AssetTracking.exe,CallerPosition.exe,ConferenceManager.exe,DirectionFinding.exe,EEAConfAccess.exd,EEC_MARINE_BROADCAST.EXE,IncidentTracking.exe,MbEndpoinT.exe|YES';

my ($file, $list_of_files, $bool) = split(/\|/, $line);

warn "FILE: $file\n";
warn "LIST: $list_of_files\n";
warn "BOOL: $bool\n";