Help for this page

Select Code to Download


  1. or download this
    my $filename = '/opt/netdb/netmacvendor/oui.txt';
    open my $fh, '<', $filename
        or die "Couldn't read $filename: $!";
    
  2. or download this
    use URI::file;
    print URI::file->new('/opt/netdb/netmacvendor/oui.txt');
    
  3. 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: $!";