#!/usr/bin/perl
use DBI;
use threads;
use Data::Dumper;
my $ds = 'DBI:mysql:*:localhost';
my $user = 'root';
my $passw = '*';
my $db = DBI->connect($ds, $user, $passw);
my $res = $db->prepare("SELECT * FROM jobs");
$res->execute();
my $n = $dbh->prepare('SELECT * FROM `table` ');
$n->execute();
my $all = $n->fetchall_arrayref( {} );
foreach my $item (@$all) {
print $item->{'name'};
}
my $all = $dbh->selectall_arrayref( "SELECT * FROM table ", { Columns => {} } );
for my $item (@$all) {
print $item->{'name'};
}