push @filter, [("EventLog", "started", "The EventLog  has been Started")];
push @filter, [("EventLog", "stopped", "The EventLog has been Stopped")];

##</code><code>##

@singlefilter = pop(@filter)

##</code><code>##

$logtype = {@singlefilter[0]}[0];
$Regex_Event = {@singlefilter[0]}[1];
$Friendly_Output = {@singlefilter[0]}[2];

##</code><code>##

$logtype=@singlefilter[0];