Select Code to Download

#Passing scalar ref
sub make_session {
...
    $$s=$session_hash;
}
&make_session($user,$dept,\$sid);

#Returning hash ref
sub make_session {
...
    return $session_hash;
}
$sid = &make_session($user,$dept);