my $dbh = DBI->connect("dbi:SQLite:dbname=$dbfile","","",{RaiseError => 1})
    or die "Couldn't connect to database: " . DBI->errstr;

##</code><code>##

my $get_all_user_rows = $dbh->prepare ("SELECT * FROM users");

##</code><code>##

$get_all_user_rows->execute();

##</code><code>##

my $all_row_ref = $get_all_user_rows->fetchall_arrayref;

##</code><code>##

foreach my $row_ref (@$all_row_ref)
{
   print "@$row_ref\n";
}