#!/usr/bin/perl -w
# File displayPipeTracer2.pl

my $testString = "          00008008 000000FF 00800000";
$testString =~ s/\s+//g;
$testString = Math::BigInt->new("0x$testString");

my $mask = Math::BigInt->new('0x400000000000000000000000');

my $maskResult = $testString & $mask;
print "Mask Result: $maskResult\n";