$schema=<<EOF;
`Name` VARCHAR(32) PRIMARY KEY,
`Address` VARCHAR(256) NOT NULL,
`Phone` VARCHAR(16) NOT NULL,
`Comment` VARCHAR(80)
EOF

importTextIntoDBI(
    $dbh,
    'myTable.txt',
    delimiter=>"\t",
    tableName=>'myTable',
    schema=>$schema,
    firstline=>2, # Skip header
    checkMissing=>[0..2], # Make sure first 3 columns are not missing,
    checkPattern=>[undef,undef,$phoneRegexp,under] # Check formats
);