#!/usr/bin/env perl

use strict;
use warnings;

require lib;

undef @INC;

foreach (@ARGV) {
  unless (-d $_) {
    warn "$_ not a directory; skipping.\n";
    next;
  }
  import lib $_;
}

print join(":", grep ! /^\.$/, @INC), "\n";