Epost (IMAP/POP3) til mysql ved hjelp av perl?

[wear]

Hei!

Driver så smått å lærer meg litt perl, virker jo veldig kjekt :-) Fra før kan jeg litt php, mysql og lærer meg mer om linux.

 

Har en OpenSUSE 10.3 box stående og har tenkt meg et lite prosjekt. Kort fortalt vil jeg at suseboxen min skal koble seg til min gmailkonto, hente ny epost, splitte opp innholdet (avsender, innhold) og legge det inn i en mysqldatabase som kjøres på samme boxen.

 

Jeg har funnet et eksempel på et perlscript som tar imot inndata og skriver til mysql, så den biten tror jeg at jeg burde klare selv (med endel knoting sikkert):

http://www.tizag.com/perlT/perlmysqlquery.php:

#!/usr/bin/perl

use Mysql;

print "Content-type: text/html \n\n";

# MYSQL CONFIG VARIABLES
$host = "localhost";
$database = "store";
$tablename = "inventory";
$user = "username";
$pw = "password";

# PERL MYSQL CONNECT()
$connect = Mysql->connect($host, $database, $user, $pw);

# SELECT DB
$connect->selectdb($database);

# DEFINE A MySQL QUERY
$myquery = "INSERT INTO 
$tablename (id, product, quantity) 
VALUES (DEFAULT,'pineapples','15')";

# EXECUTE THE QUERY FUNCTION
$execute = $connect->query($myquery);

 

Det jeg ikke helt har funnet ut av er hvordan få suseboxen til å hente epost og dytte inn evt ny epostdata inn i scriptet over. Jeg har mulighet til å laste ned/sjekke eposten via IMAP eller POP3.

 

Når scriptet er i boks så regner med at det bare er å kjøre det som en cron job ved gjevne mellomrom.

 

Så hvis noen evt kan dytte meg i riktig retning, så hadde det vært ypperlig!

 

EDIT:

Lurer på om jeg er inne på noe her?

http://www-128.ibm.com/developerworks/linu....html#resources

Endret 27. november 2007 av wear

[Torbjørn]

Interessant prosjekt!

på search.cpan.org finner du garantert moduler for POP og eller IMAP