use strict;
use warnings;
print "What is the conference hexidecimal name?\nInput Name:";
my $Conf_Hex = <>;
chomp ($Conf_Hex); 

 while ( my $polling = <$textfile>) { 
	if ( $polling =~ m/VtO<.+> VtTp<(?!0)(\d{1,3})>.+MCfID<0x$Conf_Hex>/ ) {
  print "$polling\n"; 
}
}
{
  close $textfile;
  }