Startup.pm

   1 package Startup;
   2 use strict;
   3 use warnings;
   4 use base 'Exporter';
   5
   6 #Where are data?
   7 our $directory = '/home/vorner/prog/pciids/';
   8 our @EXPORT=qw($directory);
   9
  10 #Where are the modules?
  11 use lib ( '/home/vorner/prog/pciids/' );
  12
  13 1;