i see two ways to answer this question. you could use a regex:
(assuming the data is in $_):
m/(\d{4}/\d{2}/\d{2}\s*?\d{2}:\d{2}:\d{2}\s*?$name\s*Communications Al
+arm\s*Critical|Minor\s*?.{17})/;
$data = $1;
that expression may need some debugging, but thats the basic idea. $name can be replaced by something to represent the N1B1,etcs. i don't know what that part of the data is so i'm not sure how to represent it in a regex.
second option:
($date, $time, $name, $comm, $alarm, $severity, $data) = split ' ',$_,
+7;
$data = substr ($data,0,17);
again this might need a little tweaking, but thats the basic idea. there are other ways as well, but these are the two that popped into my head.