diff options
author | in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2003-10-16 14:04:30 +0800 |
---|---|---|
committer | in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2003-10-16 14:04:30 +0800 |
commit | 2e8825bda0767f73f074f096d46bf813912a8a7b (patch) | |
tree | 9fc05171f14a5844def429dd3b463b51cf5a9f1a | |
parent | 158f8dbbc3dea1aa2abf685d16d0b0b701fdc2fe (diff) | |
download | pttbbs-2e8825bda0767f73f074f096d46bf813912a8a7b.tar pttbbs-2e8825bda0767f73f074f096d46bf813912a8a7b.tar.gz pttbbs-2e8825bda0767f73f074f096d46bf813912a8a7b.tar.bz2 pttbbs-2e8825bda0767f73f074f096d46bf813912a8a7b.tar.lz pttbbs-2e8825bda0767f73f074f096d46bf813912a8a7b.tar.xz pttbbs-2e8825bda0767f73f074f096d46bf813912a8a7b.tar.zst pttbbs-2e8825bda0767f73f074f096d46bf813912a8a7b.zip |
untie everything
git-svn-id: http://opensvn.csie.org/pttbbs/trunk@1249 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
-rwxr-xr-x | pttbbs/staticweb/man.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pttbbs/staticweb/man.pl b/pttbbs/staticweb/man.pl index 274797af..8ade7d6c 100755 --- a/pttbbs/staticweb/man.pl +++ b/pttbbs/staticweb/man.pl @@ -6,11 +6,9 @@ use LocalVars; use DB_File; use strict; use Data::Dumper; -use Date::Calc qw(:all); use Template; use OurNet::FuzzyIndex; use Data::Serializer; -use Encode; use Time::HiRes qw/gettimeofday tv_interval/; use b2g; use POSIX; @@ -61,6 +59,7 @@ sub main $rh->{charset} = 'big5'; } $tmpl->process($rh->{tmpl}, $rh); + untie %db; } sub dirmode @@ -125,6 +124,7 @@ sub search($) $th{elapsed} = tv_interval($t0); $th{key} = $key; $th{tmpl} = 'search.html'; + undef $idx; return \%th; } |