perl sprintf (строки)

reverse?

2 раза

Решил так:
$а = 10.255
reverse $a; 
$b = reverse (sprintf("%.5s", $a));

может еще есть варианты?
ps число динамическое (5s,7s,23s,...), желательно без условий (if,while,...)

регекспы

а как ты задашь регекспам число сколько надо отрезать без условий?

> а как ты задашь регекспам число сколько надо отрезать без условий?

$ perl -e '$a = "10.255"; $a =~ /.{2}(.*)/; print "$1\n";'
.255

или что Вам нужно ?

...\.(\d+)

отрезать три символа перед точкой и оставить только число. как грязи короче если регекспы