my $rc = $db2->Sql($sql2);
  die sprintf "Query error!! RC: %s ; Error: %s ; SQL: %s", $rc, $Sql-
+>Error(), $sql2;
[download]

This solution worked for me but without second line. Second line gave me an error saying that i cant call method Error on undefined value. Thank you guys for your help. From what i've read around net DBI looked much easier to read but i just couldn't get it to work. I will give it a shoot again and will see what happens.