#!/usr/bin/perl -w

# Move this script to a package later, so we do not
# have multiple copies of it.

use strict;

my $line;
my $package;
my $jars;

while ($line = <>) {
  chomp $line;
  next if ($line =~ /^\s*\#/);
  next if ($line =~ /^\s*$/);  
  ($package, $jars) = $line =~ /^([^\s]+)\s+(.*)/;
  print "$package\n";
}