Guest User

Untitled

a guest
Apr 8th, 2018
127
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.48 KB | None | 0 0
  1. #!/usr/bin/perl;
  2. #DB.pm
  3. package DB;
  4. use DBIx::Skinny connect_info => +{
  5. dsn => 'dbi:mysql:deafnews:localhost',
  6. username => 'root',
  7. password => 'password',
  8. connect_options => +{
  9. RaiseError => 1,
  10. PrintError => 0,
  11. AutoCommit => 1,
  12. },
  13. };
  14.  
  15. 1;
  16.  
  17. package DB::Schema;
  18. use DBIx::Skinny::Schema;
  19.  
  20. install_table deaf_news => schema {
  21. pk 'id';
  22. columns qw/id title keyword url bitly_url publisher publisheddate flag created_at updated_at/;
  23.  
  24. };
  25.  
  26. 1;
Add Comment
Please, Sign In to add comment