Help for this page
connect( $database, $user, $password );
sub connect { my( $db, $user, $pw ) = @_; ... };