my $sth->prepare("exec DBname..stored_proc_name ?,?");
$sth->execute($var1,'var2');

while ($sth->fetchrow_hashref){.....
...
}