- or download this
my $filename = '/opt/netdb/netmacvendor/oui.txt';
open my $fh, '<', $filename
or die "Couldn't read $filename: $!";
- or download this
use URI::file;
print URI::file->new('/opt/netdb/netmacvendor/oui.txt');
- or download this
#!/usr/bin/perl
use strict;
use Net::MAC::Vendor;
...
my $filename = '/opt/netdb/netmacvendor/oui.txt';
open my $fh, '<', $filename
or die "Couldn't read $filename: $!";