BEGIN {
  my $a = "c:/";
  use lib "$a";
}

use GetWords;
print new GetWords;