while (<DATA>) {
    chomp;
    my $copy = $_;
    s/[< ]+//g;
    print "MATCH => $copy\n" if $_ eq 'Sensor30';
}