<div>Descobri o problema...</div>
<div>&nbsp;</div>
<div>Antes:&nbsp;&nbsp;&nbsp; DBI::mysql</div>
<div>Depois:&nbsp; DBI:mysql</div>
<div>&nbsp;</div>
<div>Alguém pode explicar qual é a diferença em se usar &quot;::&quot; ou &quot;:&quot;? <br><br>&nbsp;</div>
<div><span class="gmail_quote">2008/2/7, Rafael Lebrao Martins &lt;<a href="mailto:rafamv1@ig.com.br">rafamv1@ig.com.br</a>&gt;:</span>
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">
<div>Bom dia, pessoal. Estou dando os primeiros passos no MySQL e já começaram os problemas.. Tenho uma BD de teste e agora, estou tentando fazer uma conexão utilizando o DBD::mysql, mas quando eu executo o código abaixo, é exibida essa mensagem de erro:</div>

<div>&nbsp;</div>
<div>Can&#39;t connect to data source mysql:database=teste;host=localhost;port=3306, no database driver specified and DBI_DSN env var not set at dbi.pl line 15<br>&nbsp;</div>
<div>O que pode estar ocorrendo? Vlw..</div>
<div>&nbsp;</div>
<div>-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------<br>#!/usr/bin/perl</div>

<div>
<p>use warnings;<br>use strict;<br>use DBI;</p>
<p>my $database = &#39;teste&#39;;<br>my $hostname = &#39;localhost&#39;;<br>my $port&nbsp;&nbsp;&nbsp;&nbsp; = &#39;3306&#39;;<br>my $user&nbsp;&nbsp;&nbsp;&nbsp; = &#39;rafael&#39;;<br>my $password = &#39;senha&#39;;</p>
<p>my $dsn = &quot;DBI::mysql:database=$database;host=$hostname;port=$port&quot;;<br>my $dbh = DBI-&gt;connect($dsn, $user, $password, {RaiseError =&gt; 1});</p></div></blockquote></div><br>