|
|||||||||
|
|||||||||
| |||||||||
|
|||||||||
|
|||||||||
| |||||||||
|
|
|
| |||||||||
 |
|
|
«
Previous Thread
|
Next Thread
»
|
Thread Tools | Search this Thread | Rate Thread | Display Modes |
Dev Shed Forums Sponsor:
|
|
|
|
#1
May 1st, 2001, 03:20 PM
|
|||
|
|||
|
I have built an e-greeting card engine using a simple database script and form-mailer. My problem is this...
Each greeting card that is sent creates a new .txt file on my server which stores variables. These text files are quickly adding up as popularity of my site increases, and I'm afraid that the burden of deleting the files to keep the server size down will quickly become too large of a task. Is there a way to have my .cgi program check the directory for old files (30 days or more) and delete them? This could either be a separate .cgi script that I can execute once a month, or preferrably some code to insert into my current .cgi that will perform this task each time a user generates a card. Any help would be VERY appreciated! Regards, JabezStone
|
|
#2
May 1st, 2001, 07:04 PM
|
|||
|
|||
|
Code:
$dir = '/path/to/data/dir';
opendir(DIR, $dir) or die $!;
while(my $file = readdir(DIR)) {
next if ($file !~ /\.txt/);
unlink($dir.'/'.$file) if ((stat($dir.'/'.$file))[9] < (time() - 24 *30 * 3600));
}
closedir(DIR);
I'd suggest putting it in a crontab to run once a day or something.
|
|
| Viewing: Dev Shed Forums > Programming Languages > Perl Programming > CGI to delete old files |
| Thread Tools | Search this Thread |
| Display Modes | Rate This Thread |
|
|
 |
|
|
Del.icio.us
Digg
Google
Spurl
Blink
Furl
Simpy
Y! MyWeb
Linear Mode
