projects
/
spider.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
9b71d53cbe6b28771cd5ea111b3de10557f1eafe
[spider.git]
/
cmd
/
debug.pl
1
#
2
# go INSTANTLY into debug mode (if you are in the debugger!)
3
#
4
# remember perl -d cluster.pl to use this
5
#
6
# Copyright (c) 1998 Dirk Koopman G1TLH
7
#
8
# $Id$
9
#
10
11
my $self = shift;
12
return (0) if $self->priv < 9;
13
14
$DB::single = 1;
15