Help for this page
its in a.pm sub db_connect { ... ECT})]; return new app::DB($ca,$eh); }
sub db_connect { my $self = shift; ... $database .= substr($self->tag('sys_runmode'),0,1); return new app::DB (["dbi:Oracle:$database", $proj, $proj . le +ngth($proj)], @_); }
www.com | www.net | www.org
No recent polls found