added perl script, input data, create table (sql)