% ldd ./auto/Time/HiRes/HiRes.so
librt.so.1 => /lib64/librt.so.1 (0x00002af3572c2000)
libc.so.6 => /lib64/libc.so.6 (0x00002af3574cb000)
libpthread.so.0 => /lib64/libpthread.so.0 (0x00002af357822000)
/lib64/ld-linux-x86-64.so.2 (0x0000003bf0000000)
####
use Time::HiRes;
open(SMAPS, "/proc/$$/smaps");
while () {
if (m/^\d/) {
chomp($lib = (split(' ', $_))[5]);
} elsif (m/^Size:\s*(\d+.*)/) {
my $size = $1;
print "$size $lib\n" if ($lib =~ m/HiRes/);
}
}
####
24 kB /usr/lib64/perl5/5.8.8/x86_64-linux-thread-multi/auto/Time/HiRes/HiRes.so
2044 kB /usr/lib64/perl5/5.8.8/x86_64-linux-thread-multi/auto/Time/HiRes/HiRes.so
4 kB /usr/lib64/perl5/5.8.8/x86_64-linux-thread-multi/auto/Time/HiRes/HiRes.so