Subject: | Wish: Run load_cache("file://.../oui.txt") in less than 2min even if DBM::Deep installed |
This script, that only loads oui.txt, takes 2min 22 seconds on my
machine to run if DBM::Deep is installed. If it isn't then it takes 1.7
seconds. I'd like the 1.7 seconds regardless of whether DBM::Deep is
installed or not. Especially since I already have oui.txt :-)
I could check for the existence of mac_oui.db (during BEGIN ?) but that
seems to be working around Net::MAC::Vendor rather than with it...
#!/usr/bin/perl -w
use strict;
use FindBin;
use Net::MAC::Vendor;
use Time::HiRes;
my $start = Time::HiRes::time;
Net::MAC::Vendor::load_cache("file://$FindBin::Bin/oui.txt");
printf "Took: %.4f\n", Time::HiRes::time - $start;