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

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

##</code><code>##

..spcode..
declare @var int
select @var = 42

select @var as var_name_for_hash
end
..endofsp..