Select Code to Download

 POE::Component::EasyDBI->spawn( 
        alias       => 'EasyDBI',
        dsn         => "DBI:mysql:database=$mysql_database;host=$mysql
+_host;port=3306",
...
            no_connect_failures => 1,
        },
    );

POE::Session->create(
...
                }
          }
          );

$VAR1 = {
          'sql' => 'INSERT INTO camincoming (site_id,cam_id,eventtime,
+filestamp,
...
                              'videotrg20090120181644_0.jpg'
                            ]
        };