Всем спасибо,
даже как то некрасиво, но опять у меня проблема, и открывать топик из за этого не хочется, может ещё кто сюда зайдёт....
В общем задачка простая, на Delphi это реализуется так,
a:=random(100); // любое число от 0 до 100
А как тоже самое на перле?
Делаю так, как по книге: (мне надо что бы $v была от 1 до 10)
$a=rand(10);
$v=sprintf "%.0f", $a;
$v+=1;
print $v;
## a в ответ ничего...