#!/usr/bin/perl
# cpanel12 - download.cgi                    Copyright(c) 1997-2006 cPanel, Inc.
#                                                           All Rights Reserved.
# copyright@cpanel.net                                         http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited

print "Content-type: text/html\r\n\r\n";
my $homedir = ( getpwuid($>) )[7];
my $user    = ( getpwuid($>) )[0];
chmod( 0700, "$homedir/pkgacct.static" );
system( "$homedir/pkgacct.static", "$user", "/tmp" );
print "DOWNLOAD READY\n";