use strict;
use warnings;
use diagnostics;

## Module(s)
use DBI;
use Data::Dumper;

## Database credentials
use constant HOST => 'localhost';
use constant USER => 'buckeyh7';
use constant PASS => 'Blue2014Host!';
use constant NAME => 'buckeyh7_cclite';

#
# connect to the database
#
my $db = DBI->connect('DBI:mysql:' . NAME . ':' . HOST, USER, PASS);

#
# Get all price related columns
#
my $query = $db->prepare('SELECT `userLogin` FROM `om_users`;');
$query->execute;

while (my @row = $query->fetchrow_array()) {
    #
    # unpack all the rows
    print Dumper(@row);
}

exit(0);

