delete_share.cgi

Unix下基于Web的管理工具

#!/usr/local/bin/perl
# delete_share.cgi
# Delete a share

require './dfs-lib.pl';
&ReadParse;
&delete_share($in{directory});
&redirect("");