if ($line =~ m|<ALERT_ID>(\d+)</ALERT_ID>|) {
  my $alert_id = $1;
}