projects
/
spider.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
34198bfaa78de15f8acfeac1faf3924f854cbe18
[spider.git]
/
cmd
/
dbstatus.pl
1
#!/usr/bin/perl
2
#
3
# Database update routine
4
#
5
# Copyright (c) 1999 Dirk Koopman G1TLH
6
#
7
my ($self, $line) = @_;
8
my @f = split /\s+/, $line;
9
my @out;
10
11
12
return (1, @out);