Sæl veriði.

Kannski er ég ekki að setja þetta inn rétt, endilega látið mig þá vita. Ég er með dáldið skemmtilega leiðinlegt vandamál. Þetta er kannski long-shot en það má reyna, ég er að reyna færa mig aðeins yfir í Perl úr PHP en að einhverri ástæðu get ég ekki tengst servernum mínum með perl forritinu mínu, fæ alltaf að ég hafi ekki aðgang en ég get tengst með php.

#!/usr/bin/perl
# PERL MODULES WE WILL BE USING
use DBI;
use DBD::mysql;
# CONFIG VARIABLES
$platform = "mysql";
$database = "store";
$host = "localhost";
$port = "3306";
$tablename = "inventory";
$user = "username";
$pw = "password";
#DATA SOURCE NAME
$dsn = "dbi:mysql:$database:localhost:3306";
# PERL DBI CONNECT
$DBIconnect = DBI->connect($dsn, $user, $pw);

Ég nota þetta setup en þegar ég reyni að tengjast fæ ég:

 
DBI connect('inventory:localhost:3306','username',...) failed: Access denied for user 'username'@'localhost' (using password: YES) at connect.pl line 22

Og svo php skráin mín

<?php
$connect = mysql_connect("localhost, "username", "password") or die ("Connection failed");
$database = mysql_select_db("inventory") or die(mysql_error());
echo "connected\n";
return("$connect $database");
?>

Þegar port er ekki skilgreint í php fyrir mysql notar það default 3306

Ég nota sama username og sama password en þegar ég nota perl skránna fæ ég að ég hafi ekki aðgang…

Any takers?