You could use bind_columns to fetch directly into separate variables, e.g.:

$sth->execute();
$sth->bind_columns(\my ($col1, $col2, $col3));
while ($sth->fetch()) {
  print "$col1 $col2 $col3\n";
}
[download]

Or go ahead and use fetchrow_array.