![[BACK]](/icons/back.gif){kind=icon}
Return to cleanup_database.pl CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / metadata_database|
Return to cleanup_database.pl CVS log | Up to [LON-CAPA] / loncom / metadata_database |
| version 1.3, 2003/02/03 05:17:50 | version 1.4, 2004/06/09 12:39:39 |
|---|---|
| Line 79 use Time::Local; | Line 79 use Time::Local; |
| use DBI; | use DBI; |
| my $help = 0; | my $help = 0; |
| my $killtime = 86400; | my $killtime = 86400*2; |
| GetOptions( "killtime=s" => \$killtime, | GetOptions( "killtime=s" => \$killtime, |
| "help" => \$help ); | "help" => \$help ); |
| if ($help) { | if ($help) { |