my ($sort, $ver, $build);
my $pcall = sprintf "%-11s", $call;
my ($sort, $ver, $build);
my $pcall = sprintf "%-11s", $call;
} else {
$ver = $clref->version if $clref && $clref->version;
$ver = $uref->version if !$ver && $uref->version;
} else {
$ver = $clref->version if $clref && $clref->version;
$ver = $uref->version if !$ver && $uref->version;