Calling Party Number: TON: 4 NPI: 1 MSISDN: 6082572086
Calling Party Number: TON: 4 NPI: 1 MSISDN: 6082572086
Charge Number: TON: 3 NPI: 1 MSISDN: 6082572086
Calling Party Number: TON: 4 NPI: 1 MSISDN: 6082572086
Calling Party Number: TON: 4 NPI: 1 MSISDN: 6082572086
Called Party Number: TON: 2 NPI: 1 MSISDN: 16082572086
Called Party Number: TON: 2 NPI: 1 MSISDN: 16082572086

##</code><code>##

chomp(my $var = <STDIN>);
  $var = qr($var);

$var1 = "MSTerminating"
$var2 = "MSORIGINATING"
$var3 = "TRANSIT"

  my $pattern = qr($var1|$var2|$var3);
  while (<FILE>)
  {
     print if /$var/ && /$pattern/;
  }

##</code><code>##

MSTerminating

Cell ID for First Cell: MCC: 310  MNC: 64  LAC: x'44D  CI: x'4F07
Calling Party Number: TON: 4 NPI: 1 MSISDN: 6082572086 (line15)
Called Party Number: TON: 1 NPI: 1 MSISDN: 16084466501 (line16)
Date for Start of Charge: 01/07/18 (line18)
Time for Start of Charge: 00:14:33
Chargeable Duration: 00:00:00

MSORIGINATING

Calling Party Number: TON: 4 NPI: 1 MSISDN: 6082572086 (line10)
Called Party Number: TON: 1 NPI: 1 MSISDN: 16084466501 (line11)
Date for Start of Charge: 01/07/18 (line30)