]> git.sommitrealweird.co.uk Git - onak.git/blob - add-imp.pl
Fix compilation of PostgreSQL backend.
[onak.git] / add-imp.pl
1 #!/usr/bin/perl
2 #
3 # $Id: add-imp.pl,v 1.2 2003/06/04 20:57:06 noodles Exp $
4 #
5
6 while (<>) {
7         /(........)$/;
8         print "Attempting to get $1\n";
9         $key = `./onak-db2 get $1`;
10         open (ONAK, "| ./onak -v add");
11         print ONAK $key;
12         close ONAK;
13
14         sleep 60;
15 }