use DBI;

my $data_source = "DBD::Sybase::dbname";	# or something like this
my $dbh = DBI->connect($data_source, $username, $password);

my $sth = $dbh->prepare(' SELECT user, pass FROM auth ');	# or something like this
$sth = $dbh->execute;
while (($user, $pass) = $sth->fetchrow_array)) {
	# do something
}