[aprssig] High speed datbase inserts (feedback/ re-think)

Andrew Rich (VK4TEC) vk4tec at tech-software.net
Wed Mar 2 13:39:37 CST 2005

I am using Telnet.pm and DBI;

the script is at work but here is the main gist

use DBI;
use Net::Telnet;
my $database_handler = DBI->connect
my $host = "third.aprs.net";
my (@data, $line);
my $t = new Net::Telnet(Timeout=> '5', port => '10152') ;
sleep 5;
print $t "user VK4TEC pass 21694 vers UI-View32 V1.92\n";
while (<$t>)
@data = split(/,/);
$sql ="insert into data values ('$data[0]','$data[1]')";
print "Bomb out";

I have seen the script stop (for the duration of the other select
statements going on) and say "Bomb out";

But it ONLY does it when i do something else on mysql that stops this
script from having 100% access

I even tried 

while (<$t>)
@data = split(/,/);
$sql ="insert delayed into data values ('$data[0]','$data[1]')";

Slowed down and was intermittenant. But bombed out some times.

The data is FAST coming in 

More information about the aprssig mailing list