Class DBI lets you work with sequences or AUTO_INCREMENT fields:
package Customer;
...
# Leave this out for MySQL
Customer->sequence('customer_id_seq');
...
package main;
$customer = Customer->create({
name => $name,
address => $address,
email => $email,
});