Select Code to Download

package NetworkClass;

...
    $dbh ||= DBIx::AnyDBD->connect("dbi:Oracle:network", 
        "user", "pass", {}, "NetWorkDBD");
}

package NetWorkDBD;

...
    my @params = @_;
# ...
}