";
echo " In a particular directory and then unzips it there
";
echo " Usage: dir = directory you want it in
";
echo " Example: /frog/dog/cat
";
echo " Usage: zip = the zip file you want uploaded and unzips
";
echo " Example: phpwcms_1.3.3.zip
";
echo '
##
#!/usr/bin/perl -w
print "Content-type: text/plain\n\n";
use CGI;
my $query = new CGI;
my $dir = $query->param('dir');
my $zip = $query->param('zip');
## Here is the commands that wont work
cd $dir
unzip $zip
## Here i can print them...just fine
print $dir;
print $zip;