Help for this page

Select Code to Download


  1. or download this
    $db = ($ENV{'SERVER_NAME'} ne "50free.net")
   ? DBI->connect("DBI:mysql:nikos_db", "root", "")
   : DBI->connect("DBI:mysql:nikos_db:50free.net","nikos_db","macgyver
+")
   or print font({-size=>5, -color=>'Lime'}, $DBI::errstr) and exit 0
  2. or download this
    Can't connect to local MySQL server through socket '/var/run/mysqld/my
+sqld.sock' (2)
  3. or download this
    $db = DBI->connect('DBI:mysql:nikos_db', 'root', '') or
$db = DBI->connect('DBI:mysql:nikos_db:50free.net', 'nikos_db', 'macgy
+ver', {RaiseError=>1});