view release on metacpan or  search on metacpan

test_drivers/get_test_dsn.pl  view on Meta::CPAN

  database driver. Using that connection, this test script will create
  a table named sqle_test, run various queries against it, and then drop it.

  Although this should not affect other applications, for safety's sake, use
  a test account or temporary data space, and avoid testing this on any
  mission-critical production systems.

  In order to run this test script against a local database, set the
  DBI_DSN environment variable to your connection string before running the
  tests, and if needed, also set the DBI_USER and DBI_PASS variables.
    Example:  > setenv DBI_DSN "DBI:mysql:test"; make test_drivers/*.t

  If you are running individual test scripts, you can pass the DSN,  
  username, and password as command-line arguments to the test.
    Example:  > perl -Mblib $0 "DBI:mysql:test"
.

  plan tests => 1;
  skip(
    "Skipping: specify DBI_DSN in environment to test your local server.\n",
    0,