X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FQSL.pm;h=1fd7130bf049b92b94121de721cc7e85cdc1f2df;hb=067835d5b0160e10a778252cf0dc6b2e4d1a74cb;hp=f62897bff61667086d98480f1aded750ce61a0ca;hpb=2733a992ac8c3d315c110a2cc1984ea0a5e5d0ff;p=spider.git diff --git a/perl/QSL.pm b/perl/QSL.pm index f62897bf..1fd7130b 100644 --- a/perl/QSL.pm +++ b/perl/QSL.pm @@ -120,6 +120,7 @@ sub get return decode($value); } + sub put { return unless $dbm;