use Fcntl;
use SDBM_File;
my %db_email;
tie (%db_email, 'SDBM_File', './email.db', O_RDWR | O_CREAT, 0666);
if(defined $db_email{$email}){
# already in DB... process apropriately
}else{
# not yet in DB
$ticketnum=get_next_ticket_num();
$db_email{$email}=$ticketnum;
}
untie(%db_email);
Les HowardIn reply to Re:
by lhoward
in thread Wondering novice...
by threepts
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |