if ($line =~ /\s*([0-9]+)\s+(\S+)\s+([0-9a-f]+)\s+([0-9a-f]+)\s+([0-9a-f]+)\s+([0-9a-f]+)\s+2[*][*]([0-9]+)/ my $seg = $1; my $name = $2; my $len = Math::BigInt->new ...
Some results have been hidden because they may be inaccessible to you
Show inaccessible results