#!/usr/bin/perl

print "Output filename: ";
my $filename = (<stdin>); chop ($filename);

system ("rm -Rf Parser");
mkdir ("Parser");

system ("cp ../*.class Parser/");
system ("cp ../*.java Parser/");
system ("cp ../COPYING Parser/");
system ("cp ../README Parser/");

system ("jar -cvf " . $filename . ".jar Parser");

