equal
deleted
inserted
replaced
67 |
67 |
68 my $sid; |
68 my $sid; |
69 my @imports; |
69 my @imports; |
70 foreach my $line (@elftran) |
70 foreach my $line (@elftran) |
71 { |
71 { |
72 if ($line =~ /imports from (\S+)\{000a0000\}(\S+)$/) |
72 # 2 imports from backend{00010001}[102828d5].dll |
|
73 # 17 imports from dfpaeabi{000a0000}.dll |
|
74 if ($line =~ /imports from (\S+)\{.{8}\}(\S+)$/) |
73 { |
75 { |
74 push @imports, $1.$2; |
76 push @imports, $1.$2; |
75 next; |
77 next; |
76 } |
78 } |
77 if ($line =~ /^Secure ID: (\S+)$/) |
79 if ($line =~ /^Secure ID: (\S+)$/) |