# vim: ft=perl use open ':utf8'; use open ':std'; use utf8; %config = ( db => { # config du connecteur driver => "DBI:XXXXX:database=XXXXX;host=XXXXXXXXX", user => "XXXXXX", password => "XXXXXXXXXX", }, table => 'XXXXXXXX', # le nom de la table qui contient les infos group_prefix => 'XXXXXXXXX', # le préfixe des colonnes de groupes close_hour => 'XX', # mise en pause des envois de SMS à XX heures begin_hour => 'XX', # reprise des envois de SMS à XX heures mail => 'XXXXXXXX@XXXXXXXXXXXX', # envoi de mails (avec msmtp) à cette adresse ); %user = ( # chaque clé correspond à une expression régulière qui sera testée sur le SMS reçu "message de groupe" => '^\s*envoi\s+[aà]\s+(\w+)\s*:\W*', "message pour un destinataire" => '^\s*sms\s+pour\s+(0\d{9})\s*:\W*', "ping" => '^\s*ping\s*$', );