Помогите найти ошибку!(Перл)

P.S. Не понимаю, как устранить:
$ perl example
Malformed prototype for main::clamp: $val,$low,$high at bs line 45

Как я понимаю не :
sub clamp ($val, $low, $high)
{
а:
sub clamp {
 my ($val, $low, $high)=@_;
правильнее будет.
Вообще такой синтаксис первый раз вижу но не уверен может
так и можно писать.

sub clamp ($$$) { my ($val, $low, $high)=@_;

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

Спасибо! Работает!