Probably I still miss something.

I have another function called create_table and the db handle does not pass correctly (should I bless it?). I does work when I create the handle within the function.

create_table($dbh, $table, "record_date char(20)");

sub create_table {
    use DBI;

    # Variables
    my $sth;
        # Database handle
        my $dbh = "$_[0]";

        # Table name and optionally schema name (schema.table)
        my $table = "$_[1]";

        # Columns and their type
        my $cols_type = "$_[2]";
    # } else {
    #     die RED, "ERROR: You have to supply database handle, table n
+ame, the columns list with their type and if you to disconnect the da
+tabase connection.\n       Stopped$!";
    # }

    # Create table
    $sth = $dbh->prepare("create table $table ($cols_type);");
    $sth->execute();
    print "INFO: The table has been created successfully.\n";

    return;
}

[download]

In reply to Re^4: $dbh could not be passed to function unless another variable is also passed by tukusejssirs
in thread $dbh could not be passed to function unless another variable is also passed by tukusejssirs

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.