my $text = "Signal\nLTE-FDD 4; Channel 2175";

my ($band, $channel) = ($text =~ /Signal\nLTE-FDD (\d{1,2}); Channel (\d{3,4})/i);

print "$band\t$channel\n";