$test = system("zip x:\\test.zip x:\\test.txt");
print $test;