#!/usr/bin/perl

use strict;
use warnings;
my @tags = qw( 8= 9= 35= );
my $reg_ex = join( '|', @tags );
open(FH, "test.log")||die("Unable to open log file: $! \n");
while(<FH>) {
  print "$_\n" if ( $_ =~ /$reg_ex/s );
}